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SEO 0001 



IDENTIFICATION 



P90DUCT CODE: 
PRODUCT NAME: 
DATE : 

MAINTAINER: 



AC-F138D-MC 

CJKDADO KTF11-AA MEMORY MANAGEMENT DIAGNOSTIC 
JANUARY. 1981 
DIAGNOSTIC PROGRAMMIMG 



THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS 
DOCUMENT. 

THE SOFTWARE DESCRIBED IN thIS DOCUMENT IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM 
AND CAN BE COPIED (WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) 
ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED 
IN WRITING BY DIGITAL. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 
THAT IS NOT SUPPLIED BY DIGITAL. 

COPYRIGHT (C) 1979,1981 BY DIGITAL EQUIPMENT CORPORATION 



C 1 

CjicDAOO MFII-AA MMU DIAG MACVll 30A(1052) 14-JAN-81 11:56 PAGE 

-JKDAD.P11 19-DEC-80 11:05 

(.5 PROGRAM HISTORY 



46 
47 

/,8 DATE REVISION 

49 

50 

51 JANUARY, 1979 A 

52 JUNE. 1979 B 
55 

54 
55 
56 

57 NOVEMBER, 1979 C 

58 

59 

60 

61 JANUARY, 1981 D 

62 

63 

64 

65 

66 

67 

68 

69 

70 



SEO 000? 



REASON FOR REVISION 



FIRST RELEASE 

SUBROUTINE FORMPA MODIFIED ERROR 
INFORMATION STORED IN R0,R2. THIS 
REVISION SAVES THE REGISTERS ON 
ENTR"' TO THE ROUTINE AND RESTORES 
THEM ON EXIT. 

CORRECTIONS WERE MADE TO THE MULTI- 
TESTER SUPPORT CODE. ALSO CODE WAS 
ADDED TO ALLOW PROGRAM OPERATION WHILE 
LINE CLOCK IS INTERRUPTING. 
EXPANDED 'READ AND WRITE WHILE IN RELOCATE 
MODE* TEST TO ALLOW UP TO 1.92MW OF MEMORY 
TO BE TESTED. CORRECTED BUGS IN THE 
•RELOCATION AND ADDER* TESTS TO ALlTI^ 
22 BIT ADDRESSING TO BE TURWPD ON A^D TESTED. 
REMOVED RESET INSTRUCTONS FROM TESTb 
WHERE THEY WERE NOT REQUIRED. PUT IN 
CODE TO SKIP TESTS AFTER FIRST PASS IN 
APT MODE THAT REQUIRED RESETS FOR TESTING. 
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SEO 000<. 



1.0 



1.1 



1.2 



1.5 



1.4 



2.0 



PROGRAM INFORMATION 



ABSTRACT 



THIS PROGRAM WAS DESIGNED USING A 'BOTTOM UP" APPROACH 
STARTING WITH THE SMALLEST SEGMENT OF MEMORY MANAGMENT 
LOGIC POSSIBLE AND BUILDING TO COVER ALL OF THE LOGIC. 
THE DIAGNOSTIC WILL PROVIDE ENOUGH INFORMATION SUCH THAT 
BY DEDUCTION. THE FAILURE CAN BE ISOLATED TO A SMALL 
SEGMENT OF THE MEMORY MANAGEMENT LOGIC. 

THE PROGRAM BEGINS BY TESTING SOME OF THE INTERNAL CPU 
DATA AND ADDRESS PATHS AND ADDRESS DETECTION LOGIC, THEN 
WORKS OUTWARD THROUGH THE MEMORY MANAGEMENT REGISTERS. 
AFTER THE REGISTERS ARE FOUND TO BE USEABLE, RELOCATION 
(CONSTRUCTION OF PHYSICAL ADDRESSES FROM A VIRTUAL ADDRESS 
AND THE ASSOCIATED PAR/PDR INFORMATION) IS TESTED FOLLOWED 
BY TESTING OF THE ABORT AND STATUS SEGMENTS OF LOGIC. 
FINALLY, CHECKS OF SPECIAL ABORT SEQUENCES AND TESTING OF 
THE MFPI/MTPI INSTRUCTIONS ARE DONE. 

REQUIREMENTS 



A KDF11 PROCESSOR WITH A MINIMUM OF 16K OF MEMORY 
AW) A CONSOLE TERMINAL ARE REQUIRED TO RUN THE PROGRAM 
UNLESS THE PROGRAM IS RUNNING UNDER APT OR ACT IN WHICH 
CASE THE CONSOLE TERMINAL IS NOT NECESSARY. 

RELATED DOCUMENTS AND STANDARDS 



1. 
2. 
3. 
4. 

5, 



ACT11/XXDP PROGRAMMING SPECIFICATION 

STANDARD APT SYSTEM TO A PDPII DIAGNOSTIC INTERFACE 

DIA6N0SITC ENGINEERING STANDARDS AND CONVENTIONS 

PDP11 MAINDEC SYSMAC PACKAGE 

XXDP USER'S MANUAL 



PRELIMINARY PROGRAMS 



BEFORE THIS MEMORY MANAGEMENT DIAGNOSITC IS RUN. THE 
FOLLOWING CPU DIAGNOSTIC SHOULD BE RUN: 

CJKD8 DCF11-AA CPU TESTS 

ALSO, ONE Of- THE MAIN MEMORY DIAGNOSTICS SHOULD BE RUN 
TO SCAN AT LEAST THE FIRST 16k TO SEE THAT A PROGRAM 
CAN BE EXECUTED. 

OPERATING INSTRUCTIONS 
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StQ 0005 



2.1 LOADING PROCEDURES 



THE PROGRAM IS SUPPLIED ON THE DIAGNOSTIC LOAD MEDIA. 
REFER TO THE XXDP USER'S MANUAL (-OR FURTHER INFORMATION. 
FOR USE WITH ACT OR APT. REFER TO THEIR RESPECTIVE 
DOCUMENTS. THE PROGRAM CAN ALSO BE DIRECTLY LOADED 
USING THE ABSOLUTE LOADER AND THE BINARY PAPER TAPE. 

2.2 STARTING Pr^OCEDURES 

THE PROGRAM IS STARTED BY LOADING ADDRESS 200. SINCE THERE 
IS NO HARDWARE SWITCH REGISTER. THE PROGRAM WILL USE THE 
SOFTWARE SWITCH REGISTER AT LOCATION 176 (LOCATION 174 
WILL BE USED AS THE SOFTWARE DISPLAY REGISTER). IN THAT CASE 
THE PROGRAM WILL ASK FOR THE INITIAL SWITCH REGISTER 
VALUE BY TYPING "SWR= XXXXXX NEWr " AFTER TYPING 
THE NAME OF THE PROGRAM (XXXXXX = THE OCTAL CONTENTS OF 
LOCATION 176). (SEE SECTION 2.4) 



2.3 CONTROL SWITCH SETTINGS 

SWITCH OCTAL VALUE 
SW15 100000 



USE 



SW14 



SW13 



SW12 



040000 



020000 



010000 



SW11 



004000 



HALT ON ERROR 

THIS SWITCH WHEN SET WILL HALT 
THE PROCESSOR WHEN AN ERROR IS 
DETECTED AFTER THE ERROR MESSAGE 
HAS BEEN TYPED. PRESSING CONTINUE 
WILL RESUME TESTING (SEE SECTION 
3.1 ABOUT LOADING THE SWITCH REG 
BEFORE CONTINUING). 

LOOP ON TEST 

THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON 
THE CURRENT SUBTEST. 

INHIBIT ERROR TYPEOUTS 

THIS SWITCH WHEN SET WILL 
INHIBIT THE TYPING Or ERROR 
MESSAGES. 

INHIBIT TRACE TRAP 

THIS SWITCH WHEN SET WILL 
INHIBIT T-BIT TRAPPING WHICH 
NORMALLY TAKES PLACE DURING 
EVERY OTHER PASS STARTING 
WITH THE THIRD PASS. 

INHIBIT SUBTEST ITERATIONS 

THIS SWITCH WHEN SET INHIBITS 
ITERATIONS OF EACH SUBTEST AFTER 
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SEO 0006 



SWIO 002000 



2.4 



SW9 



SW8 



00' 000 



000400 



THE FIRST PASS. If THIS SWITCH 
IS NOT SET, EACH SUBTEST IS RUN 
200. TIMES. 

BELL ON ERROR 

THIS SWITCH WHEN SET WILL RING 
THE CONSOLE TERMINAL BELL WHEN 
AN ERROR HAS BEEN DETECTED. 

LOOP ON ERROR 

THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
FIRST FAILURE WHICH IS ENCOUNTERED 
EVEN IF THE FAILURE IS INTFRMITTANT 

LOOP ON TEST IN SWR<7:0> 

THIS SWITCH WHEN SET WILL 
CAUSt THE PROGRAM TO LOOP ON THE 
TEST WHOSE TEST NUMBER IS SET 
IN BITS 7-0 OF THE SWITCH REG. 



LOADING THE SWITCH REGISTER 



TO LOAD THE SOFTWARE SWITCH REG. WHILE THE PROGRAM IS 
RUNNING. A CONTROL G (*G) SHOULD BE TYPED ON THE CONSOLE 
TERMINAL. (THE "SCOPE" AND "ERROR" ROUTINES CHECK TO SEE 
IF A *G HAS BEEN TYPED.) THE ORIGINAL VALUE OF THE SOFTWARE 
SWTICH REG. WILL BE REQUESTED AS MENTIONED IN SECTION 2.2. 

IN RESPONSE TO A *G OR AT THE BEGINNING OF THE PROGRAM, THE 
PROGRAM WILL TYPE: 

SWR = XXXXXX NEW = 

WHERE "XXXXXX" IS THE CURRENT OCTAL CONTENTS OF LOC. 176. 
THE OPERATOR MAY THEN TYPE ANY ONE OF THE FOLLOWING: 
XXXXXX<CR> ONE TO SIX OCTAL DIGITS FOLLOWED BY A 
CARRIAGE RETURN WHICH WILL BE LOADED 
AS THE NEW VALUE FOR THE SWITCH REG. 
<CR> JUST A <CR>. LEAVES THE SWITCH REG. 
AS IT IS. 

XXX*U A CONTROL -U (*U) WILL CAUSE ALL OF THE 

DIGITS TYPED SO FAR TO BE IGNORED. 
*C WILL CAUSE THE PROGRAM TO TYPE THE PRESENT 

TEST AND PASS NIJ«ERS, REQUEST A NEW VALUE 
FOR THE SWITCH REG., AND JUMP TO THE END- 
OF-PASS ROUTINE SO THE PROGRAM WILI GO DIRECTLY 
TO THE NEXT PASS WITH A NEW SW. REG. VALUE 
<ILL.CHAR> ANY CHARACTER TYPED WHICH IS NOT ANY OF THE 

ABOVE OR AN OCTAL DIGIT WILL CAUSE THE PROGRAM 
TO TYPE A "?<CRLF>" AND REACT AS THOUGH A 
*U HAD BEEN TYPED. 



NOTE: RECOGNITION OF A *G MAY BE HAMPERED BY 
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SEO 0007 



2.5 



3.0 



3.1 



3.2 



EXECUTION OF A COUPLE "RESET" INSTRUCTIONS 

WITHIN THE PROGRAM. 

EXECUTION TIMES 

THE RUN TIME FOR A SINGLE PASS WITH NO ITERATIONS 
OR TRACE TRAPPING IS APPROXIMATELY 5 SECONDS. 

THE RUN TIME FOR A SINGLE PASS WITH ITERATIONS 

AND TRACE TRAPPING ENABLED IS APPROXIMATELY 30 SECONDS. 

ERROR INFORMATION 



ERROR REPORTING PROCEDURES 



IF AN ERROR IS DETECTED, THE PROGRAM WILL TRAP TO ^HE 
ERROR HANDLING ROUTINE ($ERROR) . THE VALUE OF BITS 
15,13.10. AND 9 IN THE SWITCH REGISTER ARE CONSIDERED 
IN REPORTING AN ERROR (SEE SECTION 2.3). THE 
ERROR INFORMATION WILL BE TYPED UNLESS SW13 = 1. 

IF SW15 =1, THE PROCESSOR WILL HALT AFTER THE ERROR IS 
REPORTED. IF THE CONTENTS OF THE SOFTWARE SWITCH REGISTER 
ARE TO BE CHANGED, A ^G SHOULD BE TYPED BEFORE PRESSING 
"CONTINUE" TO RESUME TESTING. 

IF SW9 = 1 (LOOP ON ERROR), THE PROGRAM WILL GO TO THE 
ADDRESS CONTAINED IN LOCATION "JLPERR". AFTER REPORTING 
THE ERROR. "SLPERR" IS SET BY EACH "SCOPE" CALL AND IS 
SET DIRECTLY DURING SOME SUBTESTS TO PROVIDE THE SMALLEST 
LOOP FOR LOOPING ON ERROR. IF SW9 = 0, THE PROGRAM WILL 
RETURN TO THE INSTRUCTION FOLLOWING THE ERROR CALL. 
(SEE SECTION 5.3 FOR MORE ON "LOOP ON ERROR"). 

INTERPRETING ERROR REPORTS 



EVERY ERROR REPORT TYPES THE NUMBER OF THE TEST IN WHICH 
THE ERROR TOOK PLACE (TESTNO) AND THE LOCATION OF THE 
ERROR CALL (ERRORPC). THESE TWO VALUES PINPOINT THE 
PLACE IN THE CODE THAT THE ERROR OCCURRED. BY REFERRING 
TO THE PROGRAM LISTING, THE OPERATOR CAN THEN READ THE 
COMMENTS ASSOCIATED WITH THAT PARTICULAR ERROR AND SUBTEST. 
A DESCRIPTION OF THE TEST FOUND IN THE PROGRAM LISTING 
WILL ALSO PROVIDE THE OPERATOR WITH INFORMATION ON THE LOGIC 
AND FUNCTIONS BEING TESTED. 

EVERY ERROR REPORT ALSO TYPES AN ERROR MESSAGE 
GIVING A VERBAL DESCRIPTION OF THE ERROR THAT HAS 
BEEN DETECTED. 

BY USING THE COMMENTS AND TEST DESCRIPTION FOUND IN 
THE PROGRAM LISTING TO DETERMINE WHAT FUNCTION OR 
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0 ouOb 



3.3 



4.0 



4.1 



4.2 



4.^ 



LOGIC WAS BEING TES1ED, THE OPERATOR CAN THEN REFER 
TO THE ENGINEERING DRAWINGS TO ISOLATE THE PROBABLE 
CAUSE FOR THE FAILURE. 

SAMPLE ERRO«» REPORT 



BELOW IS AN EXAMPLE OF AN ERROR WHICH COULD HAVE 
OCCURRED DURING EXECUTION OF THE PROGRAM: 

MEM. MGMT. REG. BITS NOT SET CORRECTLY 

RE6ISTR WROTE READ READ-CBINARY) 

ADDRESS (OCTAL) (OCTAL) 5432109876543210 TESTNO ERRORPC 

} 77572 040000 060000 0110000000000000 000012 022060 

WE SEE THAT THE ERROR OCCURRED IN TEST 12 AT LOACTION 
022060. THE "REGISTR ADDRESS" TELLS US THAT WE WERE 
TESTING MEMORY MANAGEMENT'S STATUS RGISTER 0 (SRO). 
IN THE LISTING, THE TEST DESCRIPTION SAYS THAT THE 
ERROR BITS (BITS <15:13» OF SRO WERE BEING SET AND 
CLEARED INDIVIDUALLY. THE ERROR REPORT SAYS WE TRIED 
TO SET BIT 14 BY WRITING "WOOOO" TO SRO BUT WHEN WE 
READ IT BACK WE READ "060000". IT APPEARS THAT BIT 13 IS 
STUCK AT "1" OR IT IS GETTING SET WHEN BIT 14 IS SET 
TO "1". ERROR REPORTS BEFORE AND AFTER THIS ONE COULD 
TELL US WHICH IS THE CASE. 

MISCELLANEOUS INFORMATION 



ACT/APT/XXDP COMPAT ABILITY 



THE PROGRAM IS FULLY ACT AND APT COMPATABLE 
AND IS SUPPORTED UNDER THE XXDP PACKAGE. 

END-OF-PASS MESSAGE 



AT THE END OF EACH PASS OF THE PROGRAM THE PASS NUMBER 
AND TOTAL NUMBER OF ERRORS SINCE THE LAST END-OF-PASS ARE 
REPORTED IN THE END-OF-PASS MESSAGE. FOR EXAW>lE: 

END OF PASS #2 TOTAL ERRORS SINCE LAST REPORT 0 

THAT WOULD INDICATE THAT PASS TWO WAS JUST COMPLETED 
AND NO ERRORS WERE DEFECTED DURING THAT PASS. BOTH 
THE PASS NlJ«ER AND NUMBER OF ERRORS ARE DECIMAL NUMBERS. 

T-8IT TRAppir^G 

THE "T-aiT" (8r 4) IN THE PROCESSOR STATUS WORD IS SET 
BY AN "mi" IN THE END-OF-PASS ROUTINE FOR Ey/ERY OTHER PAaS 
BEGINNING WITH THE THIRD PASS (PASSES 3.5.7.9...). T-BI r 
TRAPPING CAN BE INHIBITED BY SETTING BIT '2 = MN tmE Swr^n 
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4.4 



4,5 



REGISTER (SEE SECTION 2.4). 
POWER FAILURE HANDLING 

IF A POWER FAIL OCCURS (FOLLOWED Bv A POwER UP). ThE 
MESSAGE "POWER FAILURE-RESTARTING" IS TYPED OuT AND 
THE PROGRAM WILL RESTART EXECUTION AT "I^ESTRT:" 

PHYSICAL BUS ADDRESS CONSTRUCTION 

BELOW IS A SIMPLIFIED DIAGRAM OF HOW THE MEMORY 
MANAGEMENT LOGIC CONSTRUCTS A PHYSICAL BUS ADDRESS 
JSING THE VIRTUAL ADDRESS AND THE PAGE ADDRESS REGISTER. 
THE PAGE DESCRIPTOR REGISTER SELECTED WILL CONTAIN THE 
PAGE EXPANSION. LENGTH. AND ACCESS INFORMATION. 

12 11 10 09 08 07 06 05 04 03 02 01 00 

/ 0 1 1 1 1 1 1/ 1 1 1 1 1 0/ V8A 





(ADDED TO) 




^5 U 13 12 11 


10 09 08 07 06 05 04 03 02 01 


00 I 


/ 0 0 0 0 0 


0010100000 

I 
I 


1/ I 



4.6 



PAR* 



21 20 19 18 17 16 15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 
/ o"*0 00000 1 1 00000001 1 1 1 1 0/P8A 

•= V8A BITS <15:13> SELECT THE APPROPRIATE PAR AND PDR 
PSW MODE BIT 01 (BIT 15) SELECTS THE USER (=1) OR 
KERNEL (-0) SET OF PAR'S/PDR'S 

RELOCATION THROUGHOUT MEMORY 

A FEATURE WAS ADDED TO ALLOW THE CONSTRUCTION OF PHYSICAL 
BUS ADDRESSES ABOVE THE NORMAL 16K LIMIT. THE SETTING 
OF THE LOCATION SMADRI IN THE E-TABLE WITH ONE OF THE 
FOLLOWING CONSTANTS WILL ACCESS LOCATIONS BETWEEN 60000 AND 
67600 OF EACH 16K GROUP UP TO THE MAXIMLM MEMORY ON THE SYSTEM. 
THE FIRST LOCATION OF EACH BL0CK(32 WORDS) IS WRITTEN AND READ. 
SEE TEST #25 IN THE LISTING FOR MORE DETAILS. 



CONST. MAX. MEM. 



CONST. MAX. MEM. 



0/600 
1600 



16K 
32K 



50600 
51600 



656K 
672K 



CONST. MAX. MEM. 

120600 1296K 
121600 1312K 
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1 1 £OUU 


IcOOK 


/ T £ f\f\ 

43600 


576K 


1 1 7^" nn 
1 1 36UU 


lilOK 


lid. AA 

44600 


592K 


i i / ZAA 

114600 


1 O7 0^ 

lificK 


45600 


Z AO^ 

60oK 


1 1 cz.An 
1 1 3600 


I chBK 










47600 


640K 


117600 


1280K 



SEO 0010 



122600 

123600 

124600 

125600 

126600 

127600 

1 30600 

131600 

132600 

1 33600 

1 34600 

135600 

136600 

137600 

140600 

141600 

142600 

143600 

144600 

145600 

146600 

147600 

150600 

151600 

152600 

153600 

154600 

155600 

156600 

157600 

160600 

161600 

162600 

163600 

164600 

165600 

166600 

167600 



1328K 

1344K 

1360K 

1376K 

1392k 

1408k 

1424K 

1440k 

1456K 

1472k 

1488K 

1504K 

1520K 

1536K 

1552K 

1568K 

1584K 

1600K 

1616K 

1632K 

1648K 

1664K 

1680K 

1696K 

1712K 

1728K 

1744K 

1760K 

1776K 

1702k 

1808K 

1824K 

1840K 

1856K 

1872K 

1888K 

1904K 

1920K 



5.0 PROGRAM DESCRIPTION 



5.1 SUBROUTINES USED BY THIS pfJOGRAM 



FOLLOWING IS A LIST OF THE SUBROUTINES AND HANDLERS USED 
BY THIS PROGRAM THAT ARE NOT PROVIDED BY THE "SYSMAC 
PACKAGE". DETAILS OF THE SUBROUTINES UNIQUE TO THIS 
PROGRAM MAY BE FOUND IN THE PROGRAM LIS'ING. REFER TO 
THE "SYSMAC" DOCUMENT AND PROGRAM LISTING FOR THE OTHER 
ROUTINES. 

1. TURN OFF T-8IT AND SAVE CURRENT "^'J 

2. TURN ON TH3IT AND RESTORE PREVIOUS PSW 

3. SET ALL WRITEABLE BITS IN ALL PAR/PDR'S 



.kDADO r^fn-AA mj DIAG 
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^,97 

499 

500 

501 

502 

503 

504 

50S 

506 

507 

508 

509 

510 

511 

51? 

513 

514 

515 

516 

517 

518 

519 

520 

521 

522 

523 

524 

525 

526 

527 

528 

529 

530 

531 

532 

533 

534 

535 

536 

537 

538 

539 

540 

541 

542 

543 

544 

545 

546 

547 

548 

549 

550 

551 

552 



MACvll 50A{1052) '<.-JAN-8^ 



L 1 
11:56 PAGE 11 



S£0 0011 



5.2 



5.3 



A. READ AND COMPARE KERNEL AND USER PAR/PDR'S 
5. CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 



PROGRAM LISTING 



A TABLE OF CONTENTS APPEARS AT THE BEGINNING OF THE LISTING 
WHICH CONTAINS THE NAMES OF EACH SECTION, SUBTEST. AND 
ROUTINE AND THE LINE NUPBERS CORRESPONDING TO THE START OF 
EACH. 

FOLLOWING THIS SECTION OF DOCUMENTATION IS THE ACTUAL 
PROGRAM LISTING COMPLETE WITH SUBTEST DESCRIPTIONS AND 
"CODING COMMENTS". 

USING THE PROGRAM TO DIAGNOSE A FAULT 

WHEN AN ERROR OCCURS. ONE OF THE THINGS THAT'S IMPORTANT 
TO NOTE IS WHAT PASS THE ERROR OCCURRED ON. IF THE PASS 
NUMBER IS ODD AND IS THREE OR GREATER. THE ERROR MIGHT BE 
T-8IT SENSITIVE. TRY RUNNING THE PROGRAM AGAIN WITH BIT 
12 OF THE SWITCH REG. EQUAL TO "1" TO INHIBIT THBIT 
TRAPPING. IF THE PASS NUMBER IS GREATER THAN ONE, THE 
ERROR MAY BE ITERATION SENSITIVE. TRY RUNNING THE PROGRAM 
AGAIN WITH BIT 11 OF THE SWITCH REG. EQUAL TO "^" TO INHIBIT 
ITERATIONS. THESE HINTS SHOULD HELP YOU DETERMINE WHAT MAKES 
THE MACHINE FAIL AND WHEN. 

IF YOU HAVE BEEN RUNNING WITH BIT 15 OF THc SWITCH 
REG. EQUAL TO "0". THEN YOU ARE ABLE TO LOOK AT ALL 
THE ERRORS THAT MAY BE RELATED TO THE FAULT YOU ARE 
DIAGNOSING. A FAULT IN AN EARLIER TEST MAY RESULT IN 
ERRORS DURING LATER TESTS WHICH MAY GIVE YOU MORE 
CLUES ABOUT THE NATURE OF THE FAULT. NOW USE THE METHOD 
OUTLINED IN SECTION 3.2 FOR EACH ERROR TO GATHER AS 
MUCH INFORMATION AS POSSIBLE. 

NOW TO TEST YOUR IDEAS ON THE CAUSE OF THE FAILURE. 
YOU MAY WANT TO SCOPE THIS ERROR CONDITION. SET BIT 09 
OF THE SWITCH REG. EQUAL TO "1" TO LOOP ON THE ERROR. 
FOR AN EVEN TIGHTER SCOPE LOOP THE ERROR CALL CAN BE 
REPLACED WITH A BRANCH (REFER TO COMMENTS BY ERROR CALLS 
IN THE PROGRAM LISTING). 

OR YOU COULD LOOP ON THE TEST BY EITHER SETTING BIT 14 
OF THE SWITCH REG. EQUAL TO "1" OF BY SETTING BIT 08 OF ^hE 
SWITCH REG. EQUAL TO "1" AND THEN SETTING THE TEST NUMBER 
IN BITS 07-00 OF THE SWITCH REG. YOU WILL PROBABLY WANT TO 
INHIBIT ERROR TYPEOUTS BY SETTING BIT 13 OF THE SWITCH REG. 
EQUAL TO "1". 
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553 
55A 
555 
556 
557 
558 
559 
560 
561 
56? 
565 
56^ 
565 
566 
567 
568 
569 
570 
57'' 
57? 
573 
57A 
575 
576 
577 

578 001100 

579 

580 

581 

582 

585 000011 
58A 000012 

585 000015 

586 000200 

587 177776 
588 

589 -[niit, 

590 Mil 72 

591 177570 

592 177570 
595 

594 

595 000000 

596 000001 

597 000002 

598 000003 

599 000004 

600 000005 

601 000006 

602 000007 

603 000006 

604 000007 
605 

606 

607 000000 

608 000040 
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TITLE C JKDADO KTF11-AA MMU 
•COPYRIGHT (C) AUGUST. 1980 
•DIGITAL EQUIPMENT CORP. 
•MAYNARD. MASS. 01754 



DIAG 



•THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
•PACKAGE (MAINDEC-11-DZQAC-C3). JAN 19. 1977. 

S8TTL OPERATIONAL SWITCH SETTINGS 



.S8TTL 



SWITCH 

15 
14 
13 
12 
11 
10 

9 

8 

BASIC 



USE 



HALT ON 
LOOP ON 
INHIBIT 
INHIBIT 
INHIBIT 
BELL ON 
LOOP ON 
LOOP ON 
DEFINITIONS 



ERROR 
TEST 

ERROR TYPEOUTS 

TRACE TRAP 

ITERATIONS 

ERROR 

ERROR 

TEST IN SWR<7:0> 



.••INITIAL ADDRESS OF 
STACK= 1100 
.EQUIV EMT. ERROR 
.EQUIV lOT. SCOPE 



THE STACK POINTER 



1100 



; .-BASIC 
;;8ASIC 



DEFINITION 
DEFINITION 



OF 
OF 



ERROR 
SCOPE 



CALL 
CALL 



•MISCELLANEOUS DEFINITIONS 

;;C0DE FOR HORIZONTAL TAB 
;;CODE FOR LINE FEED 
;;CODE FOR CARRIAGE RETURN 
;;CODE FOR CARRIAGE RETURN-LINE FEED 
;; PROCESSOR STATUS WORD 



HT= 
LF = 
CR= 
CRLF = 
PS= 
.EQUIV 
STKLMT= 
PIRQ- 
DSWR= 
DDISP= 



11 
12 
15 
200 

1 7177b 
PS.PSW 
\7777U 
-[77772 
177570 
177570 



.•STACK LIMIT REGISTER 
.•PROGRAM INTERRUPT REQUEST REGISTER 
.•HARDWARE SWITCH REGISTER 
.■HARDWARE DISPLAY REGISTER 



; •GENERAL PURPOSE REGISTER DEFINITIONS 



R0= 
R1 = 
R2= 
R3= 
R4- 
R5= 
R6= 
R7= 
SP= 
PC- 



XO 

x^ 

X2 
X5 
24 
X5 
%6 
X7 
Xt 
X7 



.•.•GENERAL 
;; GENERAL 
.•.•GENERAL 
;; GENERAL 
;; GENERAL 
;; GENERAL 
;; GENERAL 
;; GENERAL 
;; STACK POINTER 
.-.•PROGRAM COUNTER 



REGISTER 
REGISTER 
REGISTER 
REGISTER 
REGISTER 
REGISTER 
REGISTER 
REGISTER 



.-•PRIORITY 
PRO- 0 
PR1 40 



LEVEL DEFINITIONS 

;; PRIORITY LEVEL 0 
.-.■PRIORITY LEVEL 1 



jUDAOO KTf 11-AA MMU 



' JKDAD.P11 


19-DEC-8C 


609 


000100 


610 


000140 


611 


000200 


612 


000240 


613 


000300 


6K 


000340 


615 




616 




617 


100000 


618 


040000 


619 


020000 


620 


010000 


621 


004000 


622 


002000 


623 


001000 


624 


000400 


625 


000200 


626 


000100 


627 


000040 


628 


000020 


629 


000010 


630 


000004 


631 


000002 


632 


000001 


633 




634 




635 




636 




637 




638 




639 




640 




641 




642 




643 




644 




645 


100000 


646 


040000 


647 


020000 


648 


010000 


649 


004000 


650 


002000 


651 


001000 


652 


000400 


653 


000200 


654 


000100 


655 


000040 


656 


000020 


657 


000010 


658 


000004 


659 


000002 


660 


000001 


(A1 




f>62 




6fc? 




'^4 





DIAG 

11; 
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SEO 0013 



PR2= 
PR3= 
PR4= 
PR5= 
PR6= 
PR7= 



100 
140 
200 
240 
300 
340 



PRIORITY 
PRIORITY 
PRIORITY 
PRIORITY 
PRIORITY 
PRIORITY 



LEVEL 
LEVEL 
LEVEL 
LEVEL 
LEVEL 
LEVEL 



.••"SWITCH REGISTER" SWITCH DEFINITIONS 

SW15= 100000 

SWK= 40000 

SW13= 20000 

SW12= 10000 

SW11= 4000 

SW10= 2000 

SW09= 1000 

SW08= 400 

SW07= 200 

SW06= 100 

SW05= 40 

SW04= 20 

SW03= 10 

SW02= 4 

SW01= 2 

SWOO= 1 

.EQUIV SW09.SW9 

.EOUIV SW08.SW8 

.EQUIV SW07.SW7 

.EQUIV SW06.SW6 

.EQUIV SW05.SW5 

.EQUIV SW04.SW4 

.EQUIV SW03,SW5 

.EQUIV SW02,SW2 

.EQUIV SW01.SW1 

.EQUIV SWOO.SWO 

.••DATA BIT DEFINITIONS 

BIT15= 100000 

BIT 14= 40000 

BIT 13= 20000 

BIT12= 10000 

BIT11= 4000 

BIT 10= 2000 

BIT09= 1000 

BIT08= 400 

BIT07= 200 

BIT06= 100 

BIT05= 40 

BIT04= 20 

BIT03= 10 

8IT02 4 

BIT01= 2 

BITOO= 1 

.EQUIV BIT09.8IT9 

.EQUIV BIT08,8IT8 

.EQUIV BIT07.8IT7 

.EQUIV BIT06.8IT6 



(BITOO TO BIT15) 



r 
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(>6S 

667 
668 
669 

670 
671 
672 

673 000004 
000010 

675 OOOOK 

676 OOOOK 

677 OOOOK 

678 000020 

679 000024 

680 000050 

681 000034 

682 000060 

683 000064 

684 000240 
685 

686 
687 
688 

689 000250 

690 

691 

692 

693 177572 

694 1 77574 

695 1 77576 

696 172516 
697 

698 
699 

700 177600 

701 177602 

702 177604 

703 177606 

704 177610 

705 177612 

706 1 776K 

707 177616 
708 

709 
710 

71 1 1 77640 

712 177642 

713 177644 
7K 177646 
715 177650 
V16 177652 

717 177654 

718 1 77656 
719 

720 
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.EQUIV BIT05,8IT5 

.EQUIV BIT04.8n4 

.EQUIV BIT03.8IT3 

.EQUIV BIT02.8IT2 

.EQUIV BIT01.8IT1 

.EQUIV BIT00.8IT0 

.-♦BASIC "CPU" TRAP VECTOR 
ERRVEC= 4 
RESVEC= 10 
T8ITVEC=K 
TRTVEC= 14 

bptve:= K 

I0TVEC= 20 
PWRVEC= 24 
EMTVEC= 30 
TRAPVEC=34 
rKVEC= 60 
TPVEC= 64 
PIRQVEC=240 
.S8TTL MEMORy MANAGEMENT 



B 2 
PAGE 



14 



StQ 0014 



ADDRESSES 

TIME OUT AND OTHER ERRORS 
RESERVED AND ILLEGAL INSTRUCTIONS 
"T" BIT 
TRACE TRAP 

BREAKPOINT TRAP (8PT) 
INPUT/OUTPUT TRAP (lOT) ••SCOPE** 
POWER FAIL 

EMULATOR TRAP (EMT) ••ERROR** 

' 'TRAP' ' TRAP 

TTY KEyeOARD VECTOR 

TTY PRINTER VECTOR 

PROGRAM INTERRUPT REQUEST VECTOR 

DEFINITIONS 



;*KT11 VECTOR ADDRESS 
MMVEC= 250 

;*KT11 STATUS REGISTER ADDRESSES 



SRO= 
SR1 = 
SR2= 
SR3= 



177572 
177574 
177576 
172516 



:*USER "I" PAGE DESCRIPTOR REGISTERS 



UIPDRO= 
UIPDR1= 
UIPDR2= 
UIPDR3= 
UIPDR4= 
UIPDR5= 
UIPDR6= 
UIPDR7= 



177600 
177602 
177604 
177606 
177610 
177612 
177614 
177616 



.••USER "I" PAGE ADDRESS REGISTERS 



UIPAR0= 
UIPARl- 
UIPAR2= 
UIPAR3= 
UIPAR4= 
UIPAR5= 
UIPAR6= 
UiPAR7- 



1 77640 
1 77642 
1 77644 
177646 
177650 
1 77652 
1 77654 
177656 



.••KERNEL "I" PAGE DESCRIPTOR REGISTERS 
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MEMORY MANAGEMENT DEf JNITIONS 



SEO 00' 



7?1 
722 
721 
72t. 
72% 
726 
727 
728 
7?9 
730 
731 
732 
733 
73A 
735 
736 
737 
738 
739 
7A0 

742 

743 

744 

745 

746 

747 

748 

749 

750 

751 

752 

755 

754 

755 

756 

757 

758 

759 

760 

761 

762 

763 

764 

765 

766 

767 

768 

769 

"70 

771 

772 

773 

774 

775 

776 



0001 74 
000176 



172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 



172340 
172342 
172344 
1 72346 
172350 
172352 
172354 
1 72356 



001100 
000700 



000000 



0001 74 
000000 
000000 



000200 0001 37 020000 



000046 
000052 



000204 
000046 
034166 
000052 
000000 
000204 



K]PDRO= 
K]PDR1= 
<1PDR2= 
K]PDR3= 
<IPDR4= 
K]PDR5= 
KIPDR6= 
KIPDR7= 



172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 



.••KERNEL "I" PAGE ADDRESS REGISTERS 

KIPAR0= 172340 
KIPAR1= 172342 
K1PAR2= 172344 
KIPAR3= 172346 
K]PAR4= 172350 
<IPAR5= 172352 
KIPAR6= 172354 
K I PAR 7= 172356 

.EQUIV SP.KSP 
.EQUIV SP.USP 
.EQUIV 8IT4.T8IT 
.EQUIV BIT6,W8IT 
KERST<= STACK 
USESTK= STACK-200 

.••ADDITIONAL DEFINITIONS 



.S8TTL TRAP CATCHER 
.=0 

;*ALL UNUSED LOCATIONS '-^jM 4 - 776 CONTAIN A ' -.+2. HALT'* 
.••SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
.••LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
.=174 

DISPREG: .WORD 0 ;; SOFTWARE DISPLAY REGISTER 

SWREG: .WORD 0 ;;SOFTWARE SWITCH REGISTER 

.Se^TL STARTING ADDRESS(ES) 

JMP a^START ;;JUMP TO STARTING ADDRESS OF PROGRAM 
.■^STTL ACTll HOOKS 

-•»♦**»•♦♦•♦*»•*«•****♦♦♦♦♦***■•**•***************»»*•*♦*••*****»••* 

;HUOKS RFOUIRFD 8Y AC Til 

$s>/pc-. 

46 
SENDAf' 
.-5? 

WCRD 0 
.=$SVPC 

.S8TTL APT PARAMETER BLOCK 



;SAVE PC 

;;1)SET L0C.46 TO ADDRESS OF SENDAD IN .IE OP 

;;2)SET LOC.52 TO ZERO 
;; RESTORE PC 
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777 
77% 
'79 
'80 

781 000024 
782 

783 00004A 

784 

785 

786 

787 

783 

789 000204 

790 000204 

791 000206 

792 000210 

793 000212 

794 000214 

795 000216 



000204 
000024 
000200 
000044 
000204 
000204 



000000 
001226 
000014 
000020 
000005 
000016 



SEO 00 V. 



;SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 



.$x-. 

.=24 
200 
. 44 
SAPTHDR 

.-.$x 



.•SAVE CURRENT LOCATION 

;SET POWER FAIL TO POINT TO START OF PROGRAM 
"FOR APT START UP 

;P0INT TO APT INDIRECT ADDRESS PNTR. 
.•POINT TO APT HEADER SLOCK 
.•RESET LOCATION COUNTER 



SETUP APT PARAMETLR BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
INTERFACE SPEC. 



SAPTHD 
$HI8TS 
SMBADR 
STSTM: 



.WORD 
.UORD 
.WORD 



SPASTM: .WORD 
SUNITM: .WORD 



0 

SMAIL 
14 
20 
5 



TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
ADDRESS OF APT MAILBOX (BITS 0-15) 
RUN TIM OF LONGEST TEST 

RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFr) 
ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 



.WORD $ETEND-$MAIL/2 .-.-LENGTH MAIL80X-E TABLE (WORDS) 
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796 
797 
798 
799 
800 
801 

802 001100 

803 001100 

80A 001100 000000 

805 001102 000 

806 001103 000 

807 0011 OA 000000 

808 001106 000000 

809 001110 000000 

810 001112 000000 

811 001 IK 000 

812 001115 001 

813 001116 000000 
8K 001120 000000 

815 001 122 000000 

816 001124 000000 

817 001126 000000 

818 001130 000000 

819 001132 OnOOO 

820 001134 000 

821 001135 000 

822 001136 000000 

823 001140 177570 

824 001142 177570 

825 001144 177560 

826 001146 177562 

827 001150 177564 

828 001152 177566 

829 0U1154 000 

830 001155 002 

831 001156 012 

832 001157 000 

833 001160 000000 
834 

835 001162 000000 

836 001164 000000 
857 001166 000000 

838 001170 000000 

839 001172 000000 

840 001174 000000 

841 001176 000000 

842 001200 000000 

843 001202 000000 

844 001204 000000 

845 001206 000000 

846 001210 000000 

847 001212 000000 

848 001214 000000 

849 001216 177607 000377 

850 001222 077 

851 001223 015 
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SEO 001/ 



;iTHlS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
;*USED IN THE PROGRAM. 



SCMTAG: 

STSTNM: 

iERFLG: 

SICNT: 

SLPADR 

SLPERR 

SERTTL 

SITEMB 

SERMAX 

SERRPC 

SGDADR 

SSDADR 

SGODAT 

SeDDAT 



SAUTOS: 
SINTAG: 

SWR: 
DISPLAY 
$TKS 
$TK8 
JTPS 
$TP8 
SNULL: 
SFILLS 
SFILLC 
STPFLG 
SRE6AD 



.=1100 

.WORD 
.BYTE 
.QYTE 
.WORD 
.WORD 
.WORD 
.WORD 
.BYTE 
•BYTE 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.BYTE 
.BYTE 
.WORD 
.WORD 
; .WORD 
177560 
177562 
177564 
177566 
.eVTE 
.BYTE 
.BYTE 
.BYTE 
.WGAD 



SREGO 
$REG1 
SREG2 
$REG3 
$RE64 
$REG5 
$TMPO 
$TMP1 
$TMP2 
$TMP3 
$TMP4 
$TMP5 
$TIMES 
$E SCAPE :0 
$8ELL 
SQUES 
SCRLF 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
• WORD 
0 



0 
0 
0 
0 
0 
0 
0 
0 
1 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

DSWR 
DO JSP 



0 

2 

12 

0 

0 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



ASCI 2 <207><377><377> 
.ASCII /?/ 
.ASCII <15> 



START OF COMMON TAGS 



CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
RESERVED- 



THE TEST NUMBER 
ERROR FLAG 

SUBTEST ITERATION COUNT 
SCOPE LOOP ADDRESS 
SCOPE RETURN FOR ERRORS 
TOTAL ERRORS DETECTED 
ITEM CONTROL BYTE 
MAX. ERRORS PER TEST 
PC OF LAST ERROR INSTRUCTION 
ADDRESS OF 'GOOD* DATA 



ADDRESS OF 'BAD' 
•GOOD' DATA 
•BAD' DATA 
-NOT TO BE USED 



DATA 



AUTOMATIC MODE INDICATOR 
INTERRUPT MODE INDICATOR 

ADDRESS OF SWITCH REGISTER 
ADDRESS OF DISPLAY REGISTER 
TTY KBD STATUS 
TTY KBD BUFFER 

TTY PRINTER STATUS REG. ADDRESS 

TTY PRINTER BUFFER REG. ADDRESS 

CONTAINS NULL CHARACTER FOR FILLS 

CONTAINS # OF FILLER CHARACTERS REQUIRED 

INSERT FILL CHARS. AFTER A "LINE FEED" 

"TERMINAL AVAILABLE" FLAG (8IT<07>=0=^ES) 

CONTAINS THE ADDRESS FROM 

WHICH (SREGO) WAS OBTAINED 

CONTAINS <<$RF6AD)+0) 

CONTAINS (($RE6AD)*2) 

CONTAINS (($REGAD)+4) 

CONTAINS (($REGAD>+6) 

CONTAINS (($RE6AD)+10) 

CONTAINS (($REGAD)*12) 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

MAX. NUMBER OF ITERATIONS 
ESCAPE ON ERROR ADDRESS 
CODE FOR BELL 
QUESTION MARK 
.CARRIAGE RETURN 
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COMWON TAGS 



f 2 
11:36 PAGE 18 



SEO 001 ^' 



R52 001224 

855 

85A 

855 

856 

857 

858 001226 

859 001226 

860 001230 

861 00123^ 

862 001 23A 

863 001236 
86A 001240 

865 001242 

866 001244 

867 001246 

868 001246 

869 001247 

870 001250 

871 001252 

872 001254 
873 

874 
875 
876 
877 
878 

879 001256 

880 001257 
881 

882 
883 
884 

885 001260 
886 

887 001262 

888 

889 

890 001262 

891 001264 

892 001266 

893 001270 

894 001272 

895 001274 

896 001276 

897 001300 

898 001302 

899 001304 

900 001306 

901 001370 

902 001312 

903 001314 



000012 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 
000 
000000 
000000 
000000 



000 
000 



000000 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



$LF: .ASCIZ <12> 
'.S8TTL APT MAI L80X-E TABLE 



;:LiNE FEED 



.EVEN 

$«AIL: 

SMSGTY 

SFATAL 

STESTN 

$PASS: 

SDEVCT: 

$UNIT: 

JMSGAD : 

SnSGLG: 

$E TABLE 

$ENV: 

SENVM: 

SSUREG: 

SUSUR: 

SCPUOP: 



* 
* 
* 

; * 

SMAMSI: 
WTYPI : 
• » 

;* 

• ♦ 

• * 

SMADRI: 
;* 

SETEND: 
.MEXIT 

TESTNO: 
UASR6: 
TRAPPC 
TRAPPS 
WASSRO 
UASSR2 
TBI TPS 
ANDADR 
ORADR 
TONUM 
VIRT1 
VIRT2 
P8AL0 
P8AHI 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 



.BYTE 
.BYTE 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



AMSGTY 

AFATAL 

ATL-STN 

APASS 

ADEVCT 

AIJNIT 

AMSGAD 

AMS6LG 

AENV 

AENVM 

ASWREG 

AUSUR 

ACPUOP 



AMAMSI 
AMTYP1 



.WORD AMADR1 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



APT MAILBOX 
MESSAGE TYPE CODE 
FATAL ERROR NUMBER 
TEST NUMBER 
PASS COUNT 
DEVICE COUNT 
I/O UNIT NUMBER 
MESSAGE ADDRESS 
MESSAGE LENGTH 
APT ENVIRONMENT TABLE 
ENVIRONMENT BYTE 
ENVIRONMENT MODE BITS 
APT SWITCH REGISTER 
USER SWITCHES 
CPU TYPE. OPTIONS 
BITS 15-11=CPU TYPE 

1 1 /04=01 , 1 1 /05=02 , 1 1 /20=03, 1 1 /40=04 , 1 1 /45=05 
11/70=06,PDQ=07.Q=10 
BIT 10=PEAL TIME CLOCK 
BIT 9=FL0ATING POINT PROCESSOR 
BIT 8=MEM0RY MANAGEMENT 
;;HIGH ADDRESS .M.S. BYTE 
;;MEM. TYPE.8LK#1 
MEM. TYPE BYTE — (HIGH BYTE) 
900 NSEC CORE=001 
300 NSEC BIPOLAR=002 
500 NSEC MOS=003 
;;HI6H ADDRESS. 8LK#1 
MEM. LAST ADDR.=3 BYTES. THIS WORD AND LOW OF "TYPE" ABOVE 



HOLDS TEST NUTBER FOR TYPEOUTS 

USED TO STORE THE STACK POIN'^ER AFTER A TRAP 

USED TO STORE THE PC OF A TRAP OR ABORT 

USED TO STORE THE PS OF A TRAP OR ABORT 

USED TO STORE CONTENTS OF SRO 

USED TO STORE CONTENTS OR SR2 

SAVES THE PSW THAT MAY HAVE ITS T-6IT ON 

HOLDS RESULT OF ADDRESSES BEING AND-ED 

HOLDS RESULT OF ADDRESSES BEING OR-ED 

HOLDS NUMBER OF TIME-OUTS 

HOLDS VIRTUAL ADDRESS TO BE CONVERTED 

HOLDS BITS <15:00> OF PHYSICAL ADDRESS 
HOLDS BITS <17:16> OF PHYSICAL ADDRESS 



CjKDADO KTFll-AA mj DIAG 
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9W 
905 
906 
907 
908 
909 
910 
911 
912 
913 
9K 
915 
916 
917 

918 001316 

919 

920 

921 001316 041162 

922 001320 04A253 

923 001322 047460 

924 001324 050270 
925 

926 

927 001326 041222 

928 001330 044323 

929 001332 047474 

930 001334 050275 
931 

932 

933 001336 041271 

934 001340 044413 

935 001342 047514 

936 001344 050304 
937 

938 

939 001346 041330 

940 001350 044413 

941 001352 047514 

942 001354 050304 
943 

944 

945 001356 041363 

946 001360 044413 

947 001362 047514 

948 001364 050304 
949 

950 

951 001366 041436 

952 001370 044413 

953 001372 047514 

954 001374 030304 
955 

956 

957 001376 041503 

958 001400 044453 

959 001402 047526 
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G 2 
; 36 PAGE 



SEO 001V 



.S8TTL ERROR POINTER TABLE 

.-•THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 

;»THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

.••LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 

;»N0TE1: IF SITEMB IS 0 THE ONLY PERTINENT DATA IS (SERRPO. 

;»N0TE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 



• * 

• * 

• * 



EM 
DH 
DT 
DF 



$ERRT8: 
.••ITEM 1 



EMI 
DH1 
DTI 
DF1 



.••ITEM 2 



EM2 
DH2 
DT2 
DF2 



;*ITEM 3 



EM3 
DH3 
DT3 
DF3 



.••ITEM 4 



EM4 

DH3 
DT3 
DF3 



.-•ITEM 5 



EMS 
DH3 
DT3 
DF3 



.••ITEM 6 



EM6 
DH3 
DT3 
DF3 



.••ITEM 7 



EM7 
DH7 
DT7 



POINTS TO THE ERROR MESSAGE 
POINTS TO THE DATA HEADER 
POINTS TO THE DATA 
POINTS TO THE DATA FORMAT 



UNEXPECTED CPU TRAP TO LOC. 004 

OLD PC OLD PSW R6 WAS TESTNO ERRORPC 

TRAPPC. TRAPPS. WASR6. TESTNO. SERPPC, 0 

0.0.0.0.0 



UNEXPECTED MEM. MGMT. TRAP TO LOC. 250 

OLD PC OLD PSW R6 WAS SRO SR2 TESTNO ERRORPC 

TRAPPC. TRAPPS, WASR6, WASSRO, WASSR2. TESTNO. SERRPC. 

0,0.0.0.0,0,0 



PRIORITY BITS SET WRONG IN PSW 
WROTE READ TESTNO ERRORPC 
$REG0,$REG1 ,TESTNO,$ERRPC,0 
0,0,0,0 



MODE BITS SET WRONG IN PSW 
WROTE READ TESTNO ERRGRPC 
$REG0.$REG1 .TESTNO.SERRPC.O 
0.0,0,0 



DUAL ADDRESSING BETWEEN HI6L0 BYTES 0^ PSW 
WROTE READ TESTNO ERRORPC 
$REG0,$RE61 .TESTNO.SERRPC.O 
0.0,0,0 



KERNEL R6 CHANGED BY WRITING USER R6 
WROTE READ TESTNO ERRORPC 
$RE60.$RE61 , TESTNO, SERRPC, 0 
0,0,0,0 



A MEMORY MGMT. REG. TIMED OUT 
ADDRESS TESTNO ERRORPC 
SREGO. TESTNO.SERRPC.O 



r JKDAD. 


pn 19-DEC-80 




OOUO^ 


0503"' 0 


961 












965 


0OU06 


041541 


96*» 


00U10 


044503 


965 






966 


00K12 


047536 


96/^ 


001A14 


050313 


968 






969 






9/^0 


00U16 


041605 


9^1 


00K20 


044603 








90 


00U22 


047552 


9/^*1 


00U24 


050320 


9/^3 






976 






9/^ 1 


001 A26 


041645 


9Ao 


00K30 


044723 


07Q 






9oU 


00U32 


047566 


981 


00K34 


050325 


902 






9o3 






TO** 


00K36 


041714 


90J 


OOKAO 


045063 


986 


00KA2 


047604 


(3Q7 
98/^ 


00K4A 


050333 


988 






909 




041751 




00K46 


QQ1 


00U50 


045063 


Sry2 


OOK52 


047604 




0014S4 


050333 


99^ 






995 






yvo 


00U56 


042004 


007 


00U60 


044723 








999 


001462 


047566 


1 AAA 


00K6A 


050325 


1 AAI 






1 AAT 

1002 






IUOj 


00U66 


042060 


IOUh 


00U70 


045113 


lUOD 






1006 


00U72 


047614 


1 AA7 

1007 


001 A 74 


050336 


1 A/IS 

1008 






1 AAQ 
1009 






1 A1 n 

lOlU 


001476 


042122 


ini 1 


001 500 


045213 


1012 






1013 


001502 


047632 


10K 


001504 


050344 


1015 
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DF7 

;*ITEM 10 

EM10 
OHIO 

DT10 
DF10 

;»ITEM 11 

EM11 
DHll 

DT11 
DF11 

;«ITEM 12 

EMI 2 
DH12 

DT12 
DF12 

;»ITEM 13 

EMI 3 
DH13 
DT'.3 
DF13 

;*ITEM 14 

EMI 4 
DH13 
DT13 
DF13 

;*ITEM 15 

EMI 5 
DH12 

DT12 
DF12 

;*ITEM 16 

EMI 6 
DH16 

DT16 
DF16 

.♦ITEM 17 

EMI 7 
DH17 

DT17 
DF17 



H 2 
PAGE 20 



SEO 0020 



;0.0,0 



SUMMARY OF MEM. MGMT. REG. TIMEOUTS 

REGISTER-ADDRS NUM. OF 

AND-ED OR-ED TIMOUTS TESTNO ERRORPC 

ANDADR . ORADR , TONUM , TE S TNO , $E RRPC , 0 

0,0.1,0.0 



MEM. MGMT. REG. WOULD NOT CLEAR 
REGISTR READ READ-(8INARY) 

ADDRESS (OCTAL) 5432109876543210 TESTNO ERRORPC 

$REG0.$REG1 .$REG1 . TESTNO. SERRPC.O 

0.0.2.0.0 

MEM. MGMT. REG. BITS NOT SET CORRECTLY 
REGISTR WROTE READ READ 

ADDRESS (OCTAL) (OCTAL) (BINARY) TESTNO ERRORPC 

$REGO.$REG1.$REG2.$REG2.TESTNO.$ERRPC.O 

0,0.0.2.0.0 



SRO EFFECTED BY WRITE TO PSW 
READ TESTNO ERRORPC 
$REGO.TESTNO.$ERRPC.O 
0.0.0 

SRI DID NOT READ ALL ZEROS 
READ TESTNO ERRORPC 
SREGO.TESTNO.SERRPC.O 
0.0.0 

DUAL ADDRESSING BETWEEN BYTES OF PAR OR PDR 
REGISTER WROTE READ READ 

ADDRESS (OCTAL) (OCTAL) (BINARY) TESTNO ERRORPC 

$REGO.$REGl.$REG2.$REG2.TESTrJO.$ERRPC.O 

0.0,0.2.0.0 

;DUAL ADDRESSING BETWEEN PAR-PDR'S 
;PAR-PDR PAR-PDR 

.■CLEARED EFFECTD EXPECTD RECEIVD TESTNO ERRORPC 
;$REG0.$REG1.$REG5.$RE62. TESTNO. $E RRPC, 0 
.•0.0.0,0.0.0 

;PHYS. ADDR. FORMED READ WRONG 
.•PHYSICAL VIRTUAL 

.•ADDRESS ADDRESS KIPAR4 TESTNO ERRORPC 

;P8AL0.VIRT1,$REG4.TESTN0.$ERRPC,0 

;3.0.0.0.0 
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1016 






1017 


001 506 


042160 


1018 


001510 


045303 


1019 






1020 


001512 


047646 


1021 


001514 


050351 


1022 






1023 






1024 


001516 


042232 


1025 


001520 


045431 


1026 






1027 


001522 


047670 


1028 


001524 


050361 


1029 






1030 






1031 


001 526 


042267 


1032 


001530 


045511 


1033 






103A 


001532 


047702 


1035 


001 534 


050365 


1036 






1037 






1038 


001536 


042326 


1039 


001 540 


045610 


1040 


001 542 


047716 


1041 


001 544 


050372 


1042 






1043 






1044 


001 546 


042372 


1045 


001550 


045640 


1046 


001552 


047726 


1047 


001554 


050375 


1048 






1049 






1050 


001556 


042432 


1051 


001 560 


045640 


1052 


001 562 


047726 


1053 


001564 


050375 


1054 






1055 






1056 


001 566 


042475 


1057 


001 570 


045700 


1058 


001 572 


047740 


1059 


001574 


050375 


1060 






1061 






1062 


001576 


042545 


1063 


001600 


045700 


1064 


001602 


047740 


1065 


001604 


050375 


1066 






1067 






1068 


001606 


042614 


1069 


001610 


045740 


1070 


001612 


047752 


1071 


001614 


050401 



DIAG 
11 
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.••ITEM 20 

EM20 
DH20 

DT20 
DF20 

.••ITEM 21 

EM21 
DH21 

DT21 
DF21 

.••ITEM 22 

EM22 
DH22 

DT22 
DF 22 

;*ITEM 23 

EM23 
DH23 
DT23 
DF23 

;*ITEM 24 

EM24 
DH24 
DT24 
DF24 

.••ITEM 25 

EM25 
DH24 
DT24 
DF24 

.••ITEM 26 

EM26 
DH26 
DT26 
DF24 

.••ITEM 27 

EM27 
DH26 
DT26 
DF24 

.••ITEM 30 

EM30 
DH30 
DT30 
DF30 



I 2 
PAGE 



21 



SEQ 0021 



PHYS. ADDR. FORMED READ WRONG IN RELOCATE W)DE 
PHYSICL PAR 4 PAR 5 

ADDRESS V8A V8A PAR 4 PAR 5 PSW TEST\0 

P8ALO,VIRT1,VIRT2,$REG4,$REG5,$TMPO.TESTNO.$ERRPC.O 

3.0.0.0.0.0,0.0 



W-8IT DID NOT GET SET IN PDR 
PDR VIRTUAL 

TESTED ADDRESS TESTNO ERRORPC 

$REG5.$REG3,TESTNO.$ERRPC,0 

0.0.0,0 



W-8IT SET IN MORE THAN ONE PDR 

PDR IN PDR VIRTUAL 

ERROR TESTED ADDRESS TESTNO ERRORPC 

$REG0,$REG5.$REG3, TESTNO, SERRPCO 

0,0,0,0.0 



W-8IT NOT CLEARED BY WRITING TO PDR 
PDR TESTNO ERRORPC 
$REG5. TESTNO. SERRPCO 
0.0.0 



WRITING SRO SET W-6IT IN KIPDR7 
PDR WAS EXPECTD TESTNO ERRORPC 
$REG2.$REG1. TESTNO, SERRPCO 
0,0,0,0 



W-8IT GOT SET DURING TIMEOUT ABORT 
PDR WAS EXPECTD TESTNO ERRORPC 
$REG2.$REG1, TESTNO, SERRPCO 
0,0,0,0 



MEMORY MGMT. ACCESS ABORT DID NOT OCCUR 
PDR 4 PSW TESTNO ERRORPC 
SRE G2 , STMPO , T E S TNO , $E RRPC 0 
0,0.0,0 



ACCESS ERROR DID NOT ABORT INSTRUCTION 
PDR 4 PSW TESTNO ERRORPC 
$REG2, STMPO, TESTNO, SERRPCO 
0.0.0.0 



SRO DID NOT REPORT ACCESS ERROR CORRECTLY 
SRO WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 
WASSR0.SREG3.$REG2. STMPO. TESTNO. SERRPCO 
0.0.0.0.0.0 
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1 Or J 








nm Ai A 


nz.?AAA 

UhcdOO 


1 n7K 


nni ADA 


nz.An5n 

UhOUcU 




UU lOcc 


nA777n 

U*»r ' 'U 




nm 

UU 1 Oc*» 


UjUmU I 








1 n70 






1 nan 


nm 

UU 1 OcO 


Uhc ' JJ 


1 Ofti 


nm A'^n 


nAAi nn 

UhO I UU 


ina5 


nm A'?p 

UU 1 O jc 


AcnnnA 




nm 

Uv IOj*» 


nsn^ni 

UjUhU I 


1 JOm 






1 nn<« 






1 uOO 


nm A^A 

wu 1 u JO 


n^^ni^ 

Uh jU I H 


lOR? 
' vOf 


nm A^n 


n^Ai An 

UHO 1 OU 




nniA^7 


ujuuch 


1 \Joy 


















1 Wire 


nm A^A 

UU 1 o*»o 






nm Asn 

Uv 1 w Jv 


n^A??n 

UHOccU 




nniAS? 

vv 1 OJC 


nson^A 


inos 


nni ASi 

vv 1 U 


nsn^ni 

U JwHv 1 








1 f 


nni ASA 


UHcooo 




nn lAAn 

vv 1 OOv 


n^A^nn 

V*»0 JUU 


moo 


nniAAP 

vv 1 OOc 


nsnnsi 

U Jvw 


1 inn 
1 1 


OniAA^ 
vv 1 OuH 


nsn^ni 

UJUHU 1 


1 ini 






1 inp 






1 in7 


nniAAA 

Uv 1 OvQ 


n^PAAA 

UHCOOO 


iin^ 


nni A7n 

vv 1 O r U 


n^A^An 

UHO JOU 


1 in*; 


nm A7? 

UU 1 D f C 


n*>nn7? 

UJUUf c 


1 inA 


nniA7^ 

UU 1 Of H 


nsn77S 

U JUJ ' J 


1 107 






1 inn 






lino 


nm A7A 

UU 1 Or O 


KJHJ 1 J J 


1 1 in 

1 1 1 U 


nm 7nn 

UU 1 f UU 


UHOmcU 


1111 
1 1 1 1 






111P 

1 1 1 c 


nni7n? 

UU 1 r Uc 


ncni nA 

UJU I UH 


1117 


nni7nA 

UU 1 r U*» 


nsn^m 

UJUmU I 


111^ 






111"; 






11 1A 

1 1 1 o 


nni7nA 

VU 1 r UO 


UH JCCC 


1117 


nni 71 n 

UU 1 r 1 U 


U**0 J JJ 


111ft 

1 1 1 o 


nm 71? 

UU 1 r 1 c 


nsni3? 

UJU 1 cc 


111Q 


noi 71 & 

UU 1 f 1 


UJUjr J 


iipn 






1121 






1122 


001716 


043271 


1123 


001720 


046360 


112A 


001722 


050072 


1125 


001724 


050375 


1126 






1127 







.••ITEM 



;*ITEM 



;*ITEM 



;*ITEM 



.••ITEM 



;*ITEM 



.••ITEM 



.-•ITEM 



.••ITEM 



31 
EM31 
DH31 
DT31 
DF30 

32 
EM32 
DH32 
DT32 
OF 30 

33 

EM33 
DH33 
DT33 
OF 24 

34 
EM34 
DH34 
DT34 
DF30 

35 
EM31 
DH35 
DT35 
DF30 

36 
EM31 
DH36 
0T36 
DF24 

37 
EM37 
DH37 

DT37 
OF 30 

40 
EM40 
0H40 
DT40 
OF 24 

41 
EM41 
DH36 
DT36 
or 24 



.••ITEM 42 



J 2 
) PAGE 22 



SEO 0022 



SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR. 

SR2 WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 

WASSP2,$REG4,$REG2,$TMPO.TESTNO.$ERRPC.O 

0,0,0,0,0,0 



PAGE LGTH. ABORT OCCURRPD WHEN IT SHOULDN'T HAVE 
V.8.A, KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC 
$REG0,SREG4,WASSR0,WASSR2, TESTNO, $ERRPC,0 
0,0,0,0,0,0 



PAGE LGTH, ABORT DID NOT OCCUR WHEN IT SHOULD HAVE 
V.8.A. KIPDR4 TESTNO ERRORPC 
$RE GO , $RE64 , TE S TNO , $E RRPC , 0 
0,0,0,0 



;SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY 
.•V.8.A. KIPDR4 SRO WAS EXPECTD TESTNO ERRORPC 
; $RE 60 , $RE G4 , UASSRO , $REG2 , TE S TNO , SERRPC , 0 
.-0,0,0,0,0,0 

;SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
;V.B.A. KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC 
; SREGO , $RE64 ,UASSR2 , $REG3 , TESTNO, SERRPC , 0 
;0.0. 0,0,0.0 



SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
SR2 WAS EXPECTD TESTNO ERRORPC 
WASSR2,$RE61 ,TESTNO.$ERRPC,0 
0,0,0,0 



SRO OR SR2 CHANGED BY A SECOND ABORT 
FIRST ABORT SECOND ABORT 

SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC 

$TMP0.$TMP2.WASSR0,WASSR2.TESTNO,$ERRPC,O 

''.0.0,0.0.0 



SRO OR SR2 WAS NOT "RESET" BY A RESET 
SRO WAS SR2 WAS TESTW ERRORPC 
WASSRO . WASSR2 . TE S TNO . SERRPC . 0 
0,0,0,0 



SR2 NOT TRACKING CORRECTLY 
SR2 WAS EXPECTD TESTNO ERROPC 
WASSR2,$REG1. TESTNO. SERRPC, 0 
0,0.0,0 
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1133 
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001 736 


043363 


1135 
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045610 


1156 


001 742 


047716 
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001744 


050372 


1138 






1159 






1140 


001746 


043432 


1141 


001 750 


046635 
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1U3 


001752 


050146 


1K4 


001 754 


050401 


1K5 
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1H7 


C01756 


043476 


1H8 


001760 


04674"^ 


1U9 
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1151 






1152 






1153 


001 762 


050164 


1154 


001 764 


050401 


1155 
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001 766 


043551 


1158 


001 770 


047144 
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1160 


001 772 


050202 


1161 


001 774 


050407 


1162 






1165 






1164 


001 776 


043614 


1165 


002000 


047144 


1166 






1167 


002002 


050202 


1168 


002004 

^0 ^0 b ^0^r ~ 


050407 


1169 






1170 






1171 


002006 


043657 


1172 


002010 


047221 


1175 


00201 2 


050214 


1174 


002014 


050413 


1175 






1176 






1177 


002016 


045715 


1178 


002020 


047241 


1179 


002022 


050222 


1180 


002024 


050415 


1181 






1182 






1183 


002026 


045773 



MACYll 30A(1052) 14-JAN-81 
ERROR POINTER TABLE 

EM42 
DH42 
DT42 
DF24 

;*ITEM 43 

EM43 
DH23 
DT23 
DF23 

;*1TEM 44 

EM44 
DH44 

DT44 
Df30 

;*ITEM 45 

Eri45 
DH45 



DT45 
DF30 

;*ITEM 46 

EM46 
DH46 

DT46 
DF46 

;*ITEM 47 

EM47 
DH46 

DT46 
DF46 

;*ITEM 50 

EM50 
DH50 
DT50 
DF50 

.••ITEM 51 

EM51 
DH51 
DT51 
DF51 

.••ITEM 52 

EM52 



K 2 
PAGE 23 



SEO 0023 



DID NOT TRAP THRU KERNEL SPACE 
PSW WAS R6 WAS TESTNO ERRORPC 
$RE G 1 , $RE G2 . T E S TNO . $E RRPC . 0 
0.0,0,0 



KT ERROR NOT SERVICED ON TIMEOUT ERROR 
PDR TESTNO ERRORPC 
$REG5. TESTNO, SERRPCO 
0,0,0 



SRO OR SR2 CHANGED BV TIMEOUT ERROR 
EXPECTED RECEIVED 

SRO SR2 SRO WAS SR2 WAS TESTNO ERRORPf 
SRE GO , SREG 1 , WASSRO , WASSR2 , TE S TNO , SERRPC , 0 
0.0,0,0,0,0 



ERROR DURING "DOUBLE ERROR" (KT & ODD ADDR.) 
EXPECTED: 

PSW PC SRO SR2 

170017 (3$*4) 020147 (5$) 
RECEIVED 

PSW PC SRO SR2 TESTNO ERRORPC 

$REG1,SREG5,WASSR0,WASSR2,TESTNO,SERRPC,0 

0,0,0,0,0.0 



MFPI INSTRUCTION PUSHED WRONG DATA 
DATA DATA 

EXPECTD RECEIVD TESTNO ERRORPC 

$RE60.$REG1,TESTNO.$ERRPC,0 

0.0,0.0 



MTPI INSTRUCTION LOADED WRONG DATA 
DATA DATA 

EXPECTD RECEIVD TESTNO ERRORPC 
$REG0.$RE61 .TESTNO,$ERRPC.O 
0.0,0.0 



STACK NOT PUSHED BY MFPI -MTPI 
TESTNO ERRORPC 
TESTNO, SERRPC, 0 
0,0 



KERNEL PAGE ACCESSED INSTEAD OF USER: MfPI-MTPI 
SRO WAS SR2 WAS TESTNO ERRORPC 
WASSRO, WASSR2,TESTNO.$ERRPC,0 
0,0.0,0 



;WR0NG PDR'S REFERENCED WHILE IN RELOCATE MODE 



cjkdado ktfii-aa mj diag 



'■JKDAD.P11 19-DEC-80 


i 1 tt*! 






11 85 






1186 


002032 


050254 


1 1 8^ 


AAOAZy 

OOcOSh 


AC A/. 51 

U5U*»c 1 


1 18o 






1 189 


002036 


A/ / AC 1 


1190 


002040 


Ay 71 / / 


1191 






1 192 




ACA5A5 

U5U2Uc 


1 193 




ACA/ A7 

05U*iUr 








1195 






1 '96 


0020A6 


A/ /II/ 




UU2U3U 










■•199 


002054 


050413 


1200 






1201 






1202 


002056 


044152 


1203 


002060 


044603 


120A 







MACVn 30A(1052) 14-JAN-81 
:05 ERROfi POINTER TABLE 

DH52 

DT52 
DF52 
.••ITEM 53 

EM53 
DH46 

DT46 
DF46 

;MTEM 54 

EM54 
DH50 
DT50 
DF50 

;*ITEM 55 

EM55 
DHll 



11:36 



L 2 
PAGE 



24 



SEO 0024 



PHVSICL PAR 4 

ADDRESS V.8.A. PAR 4 SRO WAS SR2 WAS PSW TESTNO 
P8ALO.ViRn,$REG4,WASSRO,WASSR2,$TMPO,TESTNO.$£RRPC.O 
3,0,0,0.0.0.0,0 

MFPD INSTRUCTION PUSHED WRONG DATA 
DATA DATA 

EXPECTD RECEIVD TESTNO ERRORPC 

$REGO,$REG1,TESTNO.$ERRPC,0 

0.0.0,0 



STACK NOT PUSHED Bv MFPD-MTPD 
TESTNO ERRORPC 
TESTNO. SERRPC.O 
0.0 



;PAR OR PDR WAS CHANGED BY A RESET 

;RE6ISTR READ READ-(8INARY) 

;ADDRESS (OCTAL) 5432109876543210 TESTNO 



ERRORPC 



CJtCDADO kTFII-AA m^J DIAG 
rjKDAD.PII 19-DEC-80 11:05 



1205 
1206 
120^ 
1208 
1209 
1210 
1211 
1212 
121? 
12K 



002062 
002064 



002066 
002070 
002072 
002074 



047552 
050320 



044210 
047417 
050256 
050431 



MACyll 30A(1052) 14-JAN-81 
ERROR POINTER TABLE 

DT11 
DF11 

.••ITEM 56 

EM56 
DH56 
DT56 
DF56 



11 



M 2 
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;$REG0.$RFG1 .$REG1 , TESTNO,$ERRPC ,0 
;0, 0,2. 0.0 



;PSW CHANGED BY AN RTI IN USER MODE 
;PSW WAS EXPECTD TESTNO ERRORPC 
;$REG1 ,$REG2. TESTNO, SERRPC.O 
.■0,0.0.0 



CJKDADO KTF11-AA MMU DIAG 
CJKDAD.Pn 19-DEC-80 11:05 
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•**•• TRAP HANDLING ROUTINES ••••* 



S60 0026 



1215 








12''6 








1217 








1218 








1219 








1220 








1221 








1222 








1223 








122A 








1225 








122o 


002076 


005227 




1 227 


002100 


1 fifff 




1228 


002102 


AAt / A7 

00K03 




1229 


0021 OA 


AAC T7T> 

005237 


AAI *50Z. 

001226 


1230 


0021 10 


A A AAAA 

000000 




\2i\ 








1232 








1233 








125A 








i235 


0021 1 2 


Ai OZ. 

012637 


AAI '^Z.Z. 

001266 


1256 


0021 16 


A1 I'J 

012637 


AAi O^A 

001270 


1237 


002122 


Af A^ T"? 

010637 


001 264 


1238 


002126 


4 A/ AA4 

1 0*»00 1 




1239 


0021 30 




i 77777 




0021 56 


/M 7 7/ Z. 

01 37A6 


AAI '3 7A 

001270 


124 1 


0021h2 


AI T7 / Z. 

013746 


AAI "^^Z, 

001266 


12h2 


rt/\'^4 / £. 

002 K6 


A AAAA^ 

000006 




1243 








1 / 
ItfHH 








12h5 








12*»6 
























12A9 








1250 








1251 
















1 OCT 










0021 50 


AAC 

005227 




4 "OC C 

1255 


002152 


1 ft (77 




1?56 


0021 54 


AAi / f\1. 






0021 56 


005257 


A A 1 '^OZ. 

001226 


1258 


AA^4 £^ 

002162 


AAAAAA 

000000 




1259 








1260 








1^61 








1262 








1263 


0021 6A 


A4 T'^ 

012637 


AA4 ^ 

001266 




Uuc 1 f\J 




AAI 07A 


1265 


0021 7A 


010637 


001264 


1266 


002200 


013737 


177572 


1267 


002206 


013737 




1268 


0022U 


0A2737 


160000 


1269 


002222 


104002 




1270 


002224 


012737 


1 77777 



,S8TTL 



***** 



TRAP HANDLING ROUTINES 



.S8TTL CPU TRAP HANDLER ROUTINE 
•*************************************************************** 

* 

• THIS SUBROUTINE WILL HANDLE ALL CPU TRAPS AND ABORTS THRU 

• "ERRVEC" (LOC. 004). IF THIS SUBROUTINE IS ENTERED BY A 

• SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A HALT IS 

• EXECUTED. 



*************************************************************** 



TIMERR: INC 
T IMF LG: .WORD 
BEO 
INC 
HALT 



1$: 



002100 



MOV 

MOV 

MOV 

ERROR 

MOV 

MOV 

MOV 

RTT 



(PC) + 

-1 

1$ 

SMSGTYPE 



(KSP)+.TRAPPC 
(KSP)+.TRAPPS 
KSP,UASR6 
1 

#-l,TIMFLG 

TRAPPS,-«SP) 

TRAPPC,-(KSP) 



MAKE FLAG ZERO IF FIRST TIME THRU 
NEGATIVE ONE FOR "HAVE ENTERED" FLAG 
BRANCH IF FIRST TIME IN 
TELL APT THERE WAS AN ERROR 
STOP! - I'VE ENTERED THIS ROUTINE 
A SECOND TIME BEFORE I FINISHED 
REPORTING THE FIRST ERROR. THE 
SECOND ENTRY ADDRESS SHOULD BE ON 
THE KERNEL STACK- 
SAVE PC+2 AT TIME OF ABORT 
SAVE PS AT TIME OF ABORT 
SAVE STACK POINTER VALUE 
UNEXPECTED TRAP OR ABORT TO LOC. 4 
MAKE FLAG NEGATIVE ONE FOR NEXT TIME 
PUT PC & PS OF TRAP ON STACK 

.-RETURN FROM INTERRUPT OR ABORT 



S8TTL MEMORY MANAGEMENT TRAP HANDLER ROUTINE 

**************************************************************** 



THIS SUBROUTINE WILL HANDLE ALL UNEXPECTED MEMORY MANAGEMENT 
TRAPS AND ABORTS THRU 'MMVEC" (LOC. 250). IF THIS SUBROUTINE IS 
ENTERED BY A SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED. A 
HALT IS EXECUTED. 

'******•*****•*•******•******•************»********************* 



M6MERR: INC 
MGMFLG: .WORD 
BEO 
INC 
HALT 



1$: 



001272 
001274 
177572 

002152 



MOV 

MOV 

MOV 

MOV 

MOV 

BIC 

ERROR 

MOV 



(PC)* 

-1 

1$ 

SMSGTYPE 



(KSP)+,TRAPPC 

(KSP)*.TRAPPS 

KSP,WASR6 

SRO.WASSRO 

SR2.WASSR2 

#1 60000, SRO 

2 

*-1 .MGMFLG 



MAKE FLAG ZERO IF FIRST TIME THRU 
NEGATIVE ONE FOR "HAVE ENTERED" FLAG 
BRANCH IF FIRST TIME IN 
TELL APT THERE WAS AN ERROR 
STOP! - I'VE ENTERED THIS ROUTINE 
A SECOND TIME BEFORE I FINISHED 
REPORTING THE FIRST ERROR. THE 
SECOND ENTRY ADDRESS SHOULD BE ON 
THE KERNEL STACK. 
SAVE PC+2 AT TIME OF ABORT 
SAVE PS AT TIME OF ABORT 
SAVE STACK POINTER VALUE 
SAVE CONTENTS OF KT STATUS 
SAVE CONTENTS OF KT STATUS 
CLEAR ERROR BITS IN STATUS 



UNEXPECTED TRAP OR 
MAKE FLAG NEGATIVE 



ABORT TO LOC 
ONE FOR NEXT 



REG. 0 
REG. 2 

REG 0 

250 
TIME 



CJICDADO KTfll-AA MMU DIAG 
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MEMORV MANAGEMENT TRAP HANDLER ROUTINE 



SfO 0027 



1271 OC2232 

1272 002236 
1275 002242 

1274 



01 37A6 
013746 
000006 



001270 
C01266 



MOV 
MOV 

RTI 



TRAPPS,-(KSP) 
TRAPPC,-(KSP) 



;PUT PC I PS OF TRAP ON STACK 
;RET(JRN FROM INTERRUPT OR ABORT, 



CjUDADO ktfii-aa mmu diag 
CJKDAD.P11 19-0EC-80 11:05 



MACV11 50A(105a) U-jAN-81 
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SEO 00^8 



127S 

1276 

1277 

1278 

1279 

1280 

1281 

1282 

1283 

128<. 

1285 

1286 

1287 

1288 

1289 

1290 

1291 

1292 

1293 

129A 

1295 

1296 

1297 

1298 

1299 

1300 

1301 

1302 

1303 

130A 

130S 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

132A 

1325 

1326 

1327 

1328 

1329 

1330 



020000 



020000 
020004 
020006 
020012 
020014 

020020 
020026 
020034 
020^ 2 
020uj0 
020056 
020064 
020072 
020100 
020106 
020112 
020116 



020226 
020232 
020240 
020246 
020254 
020262 

020264 
020266 
020272 
020274 
020302 



020000 



012706 
005026 
022706 
001374 
012706 

012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
013737 
005037 
005037 
112737 



.S8TTL 

.S8TTL ••••• 
.S8TTL ••••• 
.=20000 



STARTING POINT OF TEST 
STARTING ADDRESS OF 200 



START: 
.S8TTL 



001100 

001140 

001100 

034304 
000340 
034564 
000340 
040646 
0C0340 
040734 
000340 
034016 
001212 
001214 
000001 



;;L00P BACK IF NO 

; .-SETUP THE STACK POINTER 



000020 
000022 
000030 
000032 
000034 
000036 
000024 
000026 
034010 



001115 



INITIALIZE THE COMMON TAGS 
;; CLEAR THE COWON TAGS (SCMTAG) AREA 

#$CMTAG.R6 ; .-FIRST LOrATION TO BE CLEARED 

(R6)+ .-.-CLEAR MEMORY LOCATION 

*SWR,R6 ;;DONE? 
.-6 

#STACK.SP 
FEW VECTORS 

#$SCOPE,a*IOTVEC ;;IOT VECTOR FOR SrOPE ROUTINE 
*340.a*I0TVEC*2 ; .-LEVEL 7 

#$ERROR.a#EMTVEC ;;EMT VECTOR FOR ERROR ROUTINE 
#340.a*EMTVEC*2 ;;LEVEL 7 

*$TRAP.a*TRAPVEC ;;TRAP VECTOR FOR TRAP CALLS 
#340. a*TRAPVEC*2; LEVEL 7 
#$PWRDN,a#PWRVEC .-.-POWER FAILURE VECTOR 
#340.a#PWRVEC+2 
SENDCT.SEOPCT 
STIMES 
SESCAPE 
M^ ,$ERMAX 



MOV 
CLR 
CMP 
BNE 
MOV 

.-.-INITIALIZE A 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
M0V8 



020124 


012737 


034270 


000014 




MOV 


020132 


012737 


000340 


000016 




MOV 


020140 


012737 


000002 


034270 




MOV 


020146 


012737 


020174 


000010 




MOV 


020154 


005046 








CLR 


0201 56 


012746 


020164 






MOV 


020162 


000006 








RTT 


020164 


012737 


000006 


034270 


64$: 


MOV 


020172 


000402 








BR 


0201 74 


062706 


000010 




65$: 


ADD 


020200 


012737 


000012 


000010 


66S: 


MOV 


020206 


005037 


034276 






CLR 


020212 


012737 


020212 


001106 




MOV 


020220 


012737 


020220 


001110 




MOV 



.•LEVEL 7 

.-SETUP END-OF -PROGRAM COUNTER 
.-INITIALIZE NUMBER OF ITERATIONS 
.-CLEAR THE ESCAPE ON ERROR ADDRESS 
'ALLOW ONE ERROR PER TEST 
.-.-INITIALIZE THE "I-BIV TRAP VECTOR. THEN LOAD LOCATION "JRTRN". IN 
;;THE 'tND-Of-PASS" (SEOP) ROUTINE, WITH A "RTI" OP "RIJ". 

*$RTRN,a#T8ITVEC ;;SET '7" BIT VECTOR TO SRTRN 
*340.a#TBITVEC-^2 .-.-LEVEL 7 



#RTI.$RTRN 
#65$.a#RESVEC 

-(SP) 

#64$. -(SP) 

#RTT.$RTRN 
66$ 

#10. SP 



.-SET $RTRN TO A RTI 
.-TRY TO DO A RTT 
.-DUMMY PS 
.-AND PC 
•TRY THE RTT 

;RTT IS LEGAL— SET $RTRN TO A RTT 
;.-RTT ILLEGAL— CLEAN OFF THE STACK 



#RESVEC+2.a#RESVEC .-.-RESTORE TRAP CATCHER 



013746 
012737 
012737 
012737 
022777 
001012 

000403 
012716 
000002 
012737 
012737 



000004 
020266 
177570 
1 77570 
y77777 



020274 

000176 
000174 



$T8IT 
#.,$LPADR 
# $LPtRR 

.-.-SIZE FOR A HARDWARE SWITCH REGISTER. IF NOT ^OUND OR IT IS 
.-.-EQUAL TO A "-1". SETUP FOR A SOFTWARE SWITCH REGISTER. 



.-CLEAR 'T* BIT SWITCH 
; INITIALIZE THE LOOP ADDRESS FOR SCOPE 
.-SETUP THE ERROR LOOP ADDRESS 



000004 
001140 
001142 
160656 



001140 
001142 



67$: 
68$: 



MOV a#ERRVEC. -(SP) 

MOV #67$,a#ERRVEC 

MOV #DSWR,SWR 

MOV #DDISP, DISPLAY 

CMP #-1.aSWR 

BNE 69$ 

BR 68$ 

MOV #68$, (SP) 
RTI 

MOV #SWREG,SWR ; 

MOV #DISPREG,DISPLAY 



SAVE ERROR VECTOR 
SET UP ERROR VECTOR 
SETUP FOR A HARDWARE SWICH REGISTER 
AND A HARDWARE DISPLAY REGISTER 
TRY TO REFERENCE HARDWARE SWR 
BRANCH If NO TIMEOUT TRAP OCCURRED 
AND THE HARDWARE SWR IS NOT = -1 
BRANCH IF NO TIMEOUT 
SET UP FOR TRAP RETURN 

POINT TO SOFTWARE SWR 



CjICDADO <TF11-AA »*1U diag 
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INITIALIZE THE COMMON TAGS 



SEO 002 



1331 


020310 


012637 


000004 




69$: 


MOV 


(SP)*,a*ERRVEC 


1332 














$PASS 


1333 


020314 


005037 


001234 






CLR 


133A 


020320 


132737 


000200 


001247 




BIT8 


*APTSIZE.$ENVM 


1335 


020326 


001403 








BEQ 


70$ 


1336 


020350 


012737 


001250 


001140 


70$: 


MOV 


#$SWREG.SWR 


1337 


020336 












1338 








;; INITIALIZE THE ERROR COUNTER 


1339 


020336 


005037 


001112 






CLR 


$ERTTL 


13A0 






.S8TTL 


TYPE PROGRAM NAME 


13A1 










;;TYPE 


THE NAME 


OF THE PROGRAM 


1342 


020342 


005227 


M7777 






INC 


#-1 


1345 


020346 


001046 








BNE 


71$ 


1544 


020350 


022737 


034166 


000042 




CMP 


#$ENDAD,a/y42 


1545 


020356 


001442 








BEQ 


71$ 


1346 


020360 


104401 


020426 






TYPE 


.72$ 


1347 








•SBTTL 


GET VALUE FOR SOFTWARE 


1348 


020364 


005737 


000042 






TST 


a/r42 


1349 


020370 


001012 








BNE 


73$ 


1350 


020372 


123727 


001246 


000001 




CMP8 




1351 


020400 


001406 








BEQ 


73$ 


1352 


020402 


023727 


001140 


000176 




CMP 


SWR,/ySUREG 


1353 


020410 


001005 








BNE 


74$ 


1354 


020412 


104407 








GTSUR 


74$ 


1355 


020414 


000403 








BR 


1356 


020416 


112737 


000001 


001134 


73$: 


Move 


#1 ,$AUTOB 


1557 


020424 








74$: 




71$ 


1558 


020424 


000417 








BR 


1559 










;;72$: 


.ASCIZ 


<CRLF>*CJKDADO 


1560 


020464 








71$: 






1361 
















1362 


020464 








RESTRT 






1363 


020464 


012706 


001100 




LOOP: 


MOV 


*STACK,KSP 


1564 


020470 


012737 


002076 


000004 




MOV 


#TIMERR,ERRVEC 


1565 


020476 


012737 


000340 


000006 




MOV 


#340,ERRVEC*2 


1566 


020504 


012737 


002150 


000250 




MOV 


XW6MERR,MMVEC 


1567 


020512 


012737 


000340 


C00252 




MOV 


iir340,MMVEC*2 


1368 


020520 


012700 


1 77777 






MOV 


n-y .RO 


1369 


020524 


010037 


002100 






MOV 


RO.TIMFLG 


1370 


020530 


010037 


002152 






MOV 


RO,MGMFLG 


1371 


020534 


012737 


000340 


001276 




MOV 


*340.T8ITPS 


1372 


020542 


005037 


y77'^72 






CLR 


SRO 


1373 

















; .-RESTORE ERROR VECTOR 

;; CLEAR PASS COUNT 
;;TEST USER SIZE UNDER APT 
;; YES. USE NON-APT SWITCH 
;;NO,USE APT SWITCH REGISTCR 

FOR EOP REPORT ($ERTTL). 
.-CLEAR ERROR COUNTER 

IF FIRST PASS 

; .-FIRST TIME? 

; .-BRANCH IF NO 

;;ACT-11? 

.-.-BRANCH IF YES 

;;TYPE ASCIZ STRING 
SWITCH REGISTER 

;;ARE WE RUNNING UNDER XXDP/ACT? 

.-.-BRANCH IF YES 

.-.-ARE WE RUNNING UNDER APT? 

; .-BRANCH IF YES 

; .-SOFTWARE SWITCH REG SELECTED? 

.-.-BRANCH IF NO 

.-.-GET SOFT-SWR SETTINGS 

.-.-SET AUTO-MODE INDICATOR 

;.-GET OVER THE ASCIZ 



INITIALIZE THE STACK POINTER 

LOAD CPU SERVICE ROUTINE INTO TRAP VECTOR 

SET NEW PS TO PRIORITY LEVEL 7-KERNEL 

LOAD MEMORY MANA6ENT ROUTINE INTO VECTOR 

SET NEW PS TO PRIORITY LEVEL 7-KtRNEL 

PUT -1 INTO RO TO INITIALIZE FLAGS 

INITIALIZE CPU ERROR FUG 

INITIALIZE MEMORY MANAGEMENT ERROR FLAG 

INITIALIZE LOG THAT HOLDS T-8IT PSW 

BE SURE MEM. MGMT IS OFF TO START WITH 



CJKDAOO r.TFM-AA fWU DIAG «ACYll 
CJKDAD.PIl 19-DEC-80 11:05 



E 3 

30A(1052) U-JAN-81 11:36 OAGE 30 
GET VALUE FOR SOFTWARE SWITCH REGISTER 



SEO 0050 



1374 








1375 








1376 








1377 








1378 








1379 








138C 








1381 








1382 
1583 








020546 


000004 




1384 


020550 


012737 


020560 


1385 


020556 


005000 




1386 


020560 


005001 




1387 


020562 


106400 




1388 


020564 


106701 




1389 


020566 


042701 


1 77437 


1390 


020572 


020001 




1391 


020574 


001401 




1392 


020576 


104003 




1393 








1394 








1395 








1396 


020600 


062700 


000040 


1397 


020604 


022700 


000400 


1398 


020610 


001 363 




1399 


020612 


012737 


020550 


1400 








1401 








1402 








1403 








1404 








1405 








1406 


020620 


000004 




1407 


020622 


012737 


020632 


1408 


020630 


005000 




1409 


020632 


005037 


1 7777b 


1410 


020636 


050037 


y7777fi 


1411 


020642 


013701 


1 77776 


1412 


020646 


042701 


Q07777 


1413 


020652 


020001 




1414 


020654 


001403 




1415 


020656 


005037 


1 7777b 


1416 


020662 


104004 




1417 








1418 








1419 








1420 


020664 


062700 


01 0000 


1421 


020670 


001360 




1422 


020672 


012737 


020622 


1423 


020700 


005037 


^7777b 


1424 








1425 








1426 








1427 








1428 








1429 









♦TEST 1 



PSW PRIORITY BIT TEST 

THIS TEST READS AND WRITES THE PROCESSOR SMTUS WORD <7:5> 'T»RIORITy BITS' 
TO SEE THAT SOME OF THE BASIC "IJATA PATH" LOGIC IS WORKING. 



tsTl : 


SCOPE 






IS: 


MOV 


*2$,$LPERR 


SET LOOP ON ERROR POINTER TO 2$ 




CLR 


RO 


INITIALIZE RO WITH PRIORI TY=0 DATA 


2$: 


CLR 


R1 


PREPARE Rl TO ACCEPT DATA READ 




MTPS 


RO 


WRITE PRIORITY BITS IN THE PSW 




MFPS 


R1 


READ BACK THE LOW BYTE OF PSW 




BIC 


#177437. R1 


MASK OFF EVERYTHING EXCEPT PRIORITY BITS 




CMP 


R0.R1 


WAS CORRECT PRIORITY SET IN THE PSW? 




BEO 


3$ 


■BRANCH IF YES 




ERROR 


3 


■PRIORITY BITS SET WRONG IN PSW 



3S: 



001110 



ADD 
CMP 
BNE 
MOV 



#40. RO 
#400, RO 
2$ 

#1$,$LPERR 



FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2%" = 000770 
CHANGE DATA TO NEXT PRIORITY 
HAVE PRIORITIES 0-7 ALL BEEN CHECKED? 
BRANCH IF NO 

RESET LOOP ON ERROR POINTER TO 1$ 



;*TEST 2 PSW MODE BIT TEST 

THIS TEST READS AND WRITES THE PROCESSOR STATUS WORD <15:12> 'WODE BITS" 

***************************************************************** 



001110 



TST2: 
1$: 

2S: 



3$: 



001110 



SCOPE 

MOV 

CLR 

CLR 

BIS 

MOV 

BIC 

CMP 

BEO 

CLR 

ERROR 



ADD 
BNE 
MOV 
CLR 



#2$.$LPERR 

RO 

PSW 

RO.PSW 

PSW.R1 

#007777. Rl 

R0.R1 

3$ 

PSW 

4 



#10000.R0 
2S 

#1S.SLPERR 
PSW 



SET LOOP ON ERROR POINTER TO 2$ 
INITIALIZE RO WITH MODE BITS = 0000 
INITIALIZE PSW 

BIT SET THE PSW MODE BITS WITH RO 

READ BACK THE CONTENTS OF THE PSW 

MASK OFF EVERYTHING EXCEPT THE MODE BITS 

WERE THE MODE BITS SET CORRECTLY? 

BRANCH IF YES 

CLEAR PSW FOR ERROR REPORT 

MODE BITS SET WRONG IN PSW 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 2$" = 000763 

CHANGE MODE BIT DATA 

BRANCH IF STILL MORE COMBINATIONS 

RESET LOOP ON ERROR POINTER TO ($ 

RESET PSW BEFORE LEAVING 



BYTE ADDRESSING TEST FOR PSW 



;*TEST I 
;* 

;* THIS TEST WRITES THE HIGH AND LOW BYTES OF THE PROCESSOR STATUS WORD 

AND READS THEM BACK TO BE SURE THEY CAN BE WRITTEN INDEPENDENTLY. 



CjkDAOO KTFll-AA MMU DIA6 
rjKDAO.Pll 19-I)EC-80 11:05 



l*t50 




















AAAAAA 
UUUUUh 




1/77 




A1 0777 


A0n71 A 


1/7/ 




AACA77 
UU jU3f 


1 7777A 


1 / 7C 




A1 07AA 


AAA 7 An 
UUU30U 


1 / 74L 


A0A70/ 


1 1 AA77 


1 77777 

\ 1 1 1 1 1 




UcU f 3U 


U 1 J' U 1 


1 7777A 


1 / 7D 


A0A77/ 


A/ 07ni 
Uhc' U 1 


An7A77 




A0A7AA 


UUU3UU 




1 / / A 


A'DA7A5 


A 0 AAA 1 
UcUUU 1 




1 / / 1 


A0A7AA 


AA1 / A7 
UU 1 hU3 




1 / / 0 


ATA7A/1, 


AAQA77 
UU5U5' 


1 7777A 
\ f f f fO 


1 3 


nor.7C5 


1 nA/vtc 




1/ / / 








1/ AC 








I*»hO 








1/ / 7 


A5n7CA 


m 5777 

U Icr J' 


UcUf Oc 


1 / / fi 


AOA7Z.O 

UcUf DC 


nACA77 
UU jU 3/ 


1 7777A 


1 AAQ 


OcUr OO 


U 1 C f UU 


UvU jHU 


1 Acn 

1 *»3U 


\jc\Jf r c 


1 1 nn77 


1 7777 

Iff r f \j 


1 A^l 


n3n77A 


U 1 J' U 1 


1 7777A 


1 *♦ JC 


Uc 1 UUc 


AA07A1 
U**c' U 1 


UUr H Jf 


1 Z_C7 
1 s53 


Uc 1 uuo 


UcUUU 1 




1 


API ni n 


UU 1 **\JD 




1 *♦ J J 


UC 1 U 1 C 




1 f f f r O 


1 A^A 

1 *« JO 


Uc 1 U 1 o 


1 n^nos 

1 U*»UU J 




\Hjr 








1 ACfl 








1 HJTf 








IhOU 


Uc 1 UcU 


U 1 c r jf 


VC V ' wu 


1 hO I 








l««Oc 








1/,A7 








1 •♦o*« 
















1 AAA 








1 AA7 








1 AAA 








1 AAQ 








1 / 7A 








1 A71 
1 *» r 1 


l/C lUcO 






1 A75 


Uc 1 U3U 


UU jU jf 


1 7777A 

\ 1 f f ( o 


1 A77 


ADI ATA 
Uc 1 Uj*» 


ni ?7nA 

U 1 C ' uo 


nni inn 

UU 1 1 uw 


1 A7A 


Uc 1 u*»u 


ni ?777 

U 1 C' J' 


1 AAAAA 
1 HUUUU 


1A7S 


n5inAA 
Uc 1 u*»o 


ni ?7nA 
u 1 c ' uo 


nnn7nn 

UUUr UU 


1A7A 
O 


051 Acp 
Uc 1 U3c 




177776 


1A77 


Uc 1 U7D 


Ucc f uo 


nni inn 

UU 1 1 UU 


1 A7fl 


Uc 1 UOc 


nni AnA 

UU 1 HUH 




1^70 

\H f 7 


Uc 1 \AJM 


nip/no 


001 100 


K80 


021070 


010601 




H81 


021072 


104006 




U82 








K83 








U84 








K85 









F 3 
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T3 BYTE ADDRESSING TEST FOR PSW 



SEO 0031 



001110 



TST3: 

It: 

2$: 



SCOPE 




SET LOOP ON ERROR POINTcR TO c% 


MOV 


*2».$LPERR ; 


CLR 


PSU ; 


CLEAR THE PSW 


MOV 


*360,R0 ; 


PUT THE HIGH BYTE DATA INTO RU 


MAV/Q 

nUvo 


on Dcu^i 


wn lit 1 nc ni on otic ur inc row 


MOV 


PSU.Rl 


READ BACK THE ENTIRE PSW 


8IC 


*007A37,R1 


MASK OFF THE T 6 CC BITS 


SWAB 


RO 


GET DATA WRITTEN IN HIGH BYTE OF RO 


CMP 


RO.Rl 


WAS THE PSW WRITTEN TO CORRECTLY 


BEO 


3$ 


BRANCH IF YES 


CLR 


PSW 


CLEAR PSW FOR ERROR REPORT 


ERROR 


5 


LOW BYTE EFFECTED BY WRITE TO HIGH BYTE 



001110 



3S: 
4S: 



5$: 



MOV 

CLR 

MOV 

M0V8 

MOV 

BIC 

CMP 

BEO 

CLR 

ERROR 



MOV 



#4S.SLPERR 
PSW 

#340, RO 

RO.PSW 

PSW.Rl 

#007437, Rl 

R0,R1 

5$ 

PSW 

5 



#1$,$LPERR 



FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 2%" = 000760 
SET LOOP ON ERROR POINTER TO 4$ 
CLEAR THE PSW 

PUT THE LOW BYTE DATA INTO RO 

WRITE THE LOW BYTE OF THE PSW 

READ BACK THE ENTIRE PSW 

MASK OFF THE T&CC BITS 

WAS PSW WRITTEN TO CORRECTLY 

BRANCH IF YES 

CLEAR PSW FOR ERROR REPORT 

HIGH BYTE EFFECTED BY WRITE TO LOU BYTE OF PSJ 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2$" = 000736 

RESET LOOP ON ERROR POINTER TO 1$ 



TEST 4 TEST AND SETUP OF STACK POINTERS 

THIS TEST SETS THE USER AND KERNEL STACK POINTERS FOR THE 
REST OF THE PROGRAM AND MAKES SURE THEY ARE INDEPENDENT OF 
EACH OTHER. KERNEL R6 IS SET TO 1100, USER R6 IS SET TO 700. THEN 
KERNEL R6 IS READ TO BE SURE ITS STILL 1100. 

*»****»»******♦******»******••»**»»»»»»»»•»»»»»»*»»»»»»***»»*** 

TST4: SCOPE 



1 7777b 



CLR 
MOV 
MOV 
MOV 
CLR 
CMP 
BEO 
MOV 
MOV 
ERROR 



PSW 

#KERSTK.KSP 
#140000, PSW 
#USESTK,USP 
PSW 

#KERSTK,KSP 

TST5 

#KERSTK.RO 

KSP,R1 

6 



GO TO KERNEL MODE 
SET KERNEL STACK POINTER TO 1100 
GO TO USER MODE 
SET USER STACK POINTER TO 700 
BACK TO KERNEL MODE 
IS KERNEL R6 STILL 1100? 
.-BRANCH IF KERNEL R6 IS OKAY 
SAVE DATA WRITTEN FOR ERROR REPORT 
SAVE DATA READ AFTER USER R6 WAS WRITTEN 
KERNEL R6 CHANGED BY WRITING USER R6 
FOR TIGHTER SCOPE LOuP 
REPLACE ERROR CALL WITH 
000756 
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K TEST AND SETUP OF STACK POINTERS 



SEQ 003? 











1 HO' 








IhOO 








































IH7J 
































IHrf 








1 H TO 
































ISO? 
























1505 








1506 








1507 








1508 








1509 








15l0 


0?1074 


000004 




151 1 








151? 


0?1076 


012737 

VIC' J' 


021 140 

VC 1 1 "tV 


1513 


021104 


012737 

V 1 C f ' 


021202 

VC 1 cvc 


1514 


021 112 

VC I 1 1 C 


01 2700 

VIC* Vv 


17757? 


151 5 


021116 

VC 1 1 1 V 


01 2701 

V 1 C r V 1 


000003 

VVVVV J 


1 516 


VC 1 ICC 


01 2737 

V 1 C f -Jf 


1 77777 

I 1 1 1 f 1 


1517 


021 1 30 

VC 1 ■ ^v 


005037 


001302 

W 1 ^vc 


1518 


0?1 1 34 


0050^7 

\J\J J\J^ 1 


001 304 


1519 


021140 

VC 1 1 V 


005710 




15?0 








1521 


021142 


062700 

VVC f w 


000002 

VW WC 


152? 


021 146 

VC 1 1 *4U 


077104 




15?3 


021150 


0057j<7 

VV^' J» 


172516 


15?4 








15?5 


021 1 54 


ni?737 


051076 

vC 1 wr u 


15?6 


0?116? 

VC 1 1 VC 


005777 

V V J f -J f 


001^04 

VV 1 JV** 




C?1 166 

VC 1 1 yJSJ 


001401 

VV 1 ~V 1 






VC 1 1 r V 


1 V** V 1 V 




15?9 


VC lire 


V 1 C ' J» 


00P07ft 

Wc Vr V 


15^0 


VC 1 cvv 


000^1 ^ 

V VVM 1 •* 




1531 








1532 


021 202 

VC 1 C VC 


062706 

WC ■ V V 


000004 

VVVVV" 


1533 


021206 

VC I C Vw 


104007 

1 V" VVr 




1534 








1535 








1536 








1537 


021210 


010002 




1538 


021212 


050237 


001302 


1539 


021216 


005102 




1540 


021220 


040237 


001300 


1541 


021224 


005237 


001 30A 



THE NEXT FIVE (5) ''ESTS WILL TRY TO ADDRESS ALL OF THE 
MEMORY MANAGEMENT REGISTERS (SRO. SRI .SR2.SR3. KERNEL ft USER PAR/^DR'b), 
EVERY TIME A REGISTER TIMES OUT ITS ADDRESS WILL BE REPORTED. 
AT THE END OF EACH TEST A SUMMARY OF THE ADDRESSES THAT TIMED 
OUT DURING THAT TEST IS GIVEN. THE RESULTS OF "'AND-ING" AND 'W-ING" 
THEIR ADDRESSES IS GIVEN TO SHOW WHICH ADDRESS LINES MAY BE 
STUCK AT 0 OR 1. THE PAR/PDR ADDRESS AND KT MUX'S ARE THE 
THINGS BEING CHECKED. 



iTEST 

* 

* 

» 

* 

^ ***** 

ST5: 



001110 
000004 



001300 



IS: 



2$: 
3$: 



001110 



000004 4S: 



5$: 



********************************************************** 

5 SR0,SR1.SR2,SR3 TIMEOUT TEST 

THIS TEST ADDRESSES THE MEMORY MANAGEMENT STATUS REGISTERS 
0,1,2. AND 3. STATUS REG. 1 IS NOT USED BUT SHOULD STILL 
RESPOND TO ITS UNIBUS ADDRESS. DATA WILL BE WRITTEN OR READ 
FROM THESE REGISTERS IN LATER TESTS, THIS TEST JJST CHECK 
FOR A RESPONSE. 

********************************************************** 

SCOPE 

MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
TST 

ADD 
SOB 
TST 

MOV 
TST 
BEQ 
ERROR 
MOV 
BR 

ADD 
ERROR 



MOV 
BIS 
COM 
BIC 
INC 



m.SLPERR 

*SRO,RO 
#3,R1 

#-1 ,ANDADR 
ORADR 
TONUM 
(RO; 

*2,R0 
R1.2$ 
a/iri72516 

xnS.SLPERR 

TONUM 

4S 

^0 

#TIMERR,a*4 
TST6 

«r4,KSP 
7 



R0.R2 
R2, ORADR 

R2 

R2,ANDADR 
TONUM 



SET LOOP ON ERROR POINTER TO 2$ 
SET TIMEOUT VECTOR TO 5J 
LOAD RO WITH ADDRESS OF FIRST REG. 
LOAD R1 WITH THE LOOP COUNT 
INITIALIZE "AND" OF ADDRS. LOC. 
INITIALIZE 'W OF ADDRS. LOC. 
INITIALIZE 'TIMEOUTS" COUNTER 
TRY ADDRESSING A STATUS REGISTER 
IF IT TIMES OUT GO TO 5$ 
PUT NEXT ADDRESS IN RO 
LOOP BACK TO 2$ UNTIL ALL TESTED 
CHECK SR3 FOR RESPONSE 
IF IT TIMES OUT GO TO 5$ 
RESET LOOP ON ERROR POINTER ^0 1$ 
DID ANY OF THE STATUS REG.S TIMEOUT? 
BRANCH IF NO 

SUMMARY Of STATUS REG. TIMEOUTS 
RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 
;G0 TO NEXT TEST 

CLEAN UP THE STACK 
ONE OF THE STATUS REGS. TIMED OUT 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2$" = 000756 

LOAD THE ADDRESS THAT TIMED OUT INTO R2 
"OR" IT WITH OTHER ADDRS. THAT TIMED OUT 
"AND" IT WITH OTHER ADDRS. THAT TIMED OUT 

.•INCREMENT THE TIMEOUT COUNTER 
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T5 SR0,SR1.SR2.SR3 TIMEOUT TEST 



SEO 0053 



ISA? 


n?i?xft 


UVA/' *»•» 




1 J** J 








1 

I JHH 








1 JHJ 








1 ^L.f> 








1 

1 1 








1 ^Lfk, 
1 jHO 








1 SAO 
















1 SSI 








1 ss? 


n?i?7? 






1 J J J 








1SSA 


n?i?34 


012737 


021276 

WC 1 C ' w 


1SSS 


0?1?4? 


012737 


021334 

Wt, 1 J 

172340 


1SS6 

1 J J\J 


0?1?50 


012700 


\ J Jf 


0?1?54 


01?701 


000010 

WWWW 1 w 


1 J JO 


0?1 ?60 


012737 


^77777 




0?1?66 


005037 
jyjj f 


001 302 

WW 1 JWC 


1 JW\J 


0?1?7? 


005037 

\J\J J\J Jt 


001 304 

WW 1 JW~ 


1 1 


r.?i ?76 


005710 




ISA? 








1563 


0?1300 


062700 


000002 

WWW WW ^ 


1S6A 


0?1 304 


077104 






0?1 306 


012737 


021234 

Wfc 1 C 




021314 


005737 


001 304 


1567 


021 320 


001401 




1568 


021 322 

VC > J%m%m 


104010 

1 W~W ' w 




1569 


021324 


012737 


002076 

W W w W i W 


1570 


021 332 


000414 




1571 








1S7P 




062706 


000004 

wwwww~ 


1573 


021 340 


1 04007 

1 W~WW ' 




1574 

I J f ^ 








1575 








1576 

\ J t W 








1577 


021 342 


010002 

W 1 WVWw 




1578 

\ J f O 


021 344 


050237 


001302 

WW 1 o/Wb 


1579 

\ J f w 


0?1 350 

V/C 1 J J J 


005102 

\J\J J 1 wc 




1580 


0?135? 

WC ' -J Jim 


040237 

W^ WC J * 


001 300 

WW 1 ^WW 


1581 

1 JV 1 


VC 1 JJ\* 


OC5237 

WW ' 


001 304 


158? 


0?136? 


000746 

WWW » ~ w 




1 583 

1 JO J 








1584 








1585 

1 JO J 








1586 








1 587 

1 JOf 








1 JOO 








1589 








1590 








1591 








1592 


021 36A 


000004 




1593 








1594 


021366 


012737 


021430 


1595 


021374 


012737 


021466 


1596 


021402 


012700 


172300 


1597 


02K06 


012701 


000010 



BR 



3$ 



.-BRANCH BACK TO TEST THE NEXT ADDR. 



iTEST 6 KERNEL PAR'S TIMEOUT TEST 

* THIS TEST ADDRESSES THE EIGHT (8) KERNEL PAGE ADDRESS 

* REGISTERS (KIPAR0-KIPAR7) AND CHECKS THAT SOMETHING 

* RESPONDS TO THEIR ADDRESSES. 
* 

TST6: SCOPE 



001110 
000004 



001300 



1$: 



2$: 
3$: 



4$: 



5$: 



MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
TST 

ADD 

S08 

MOV 

TST 

BEQ 

ERROR 

MOV 

BR 

ADD 
ERROR 



MOV 
BIS 
COM 
6IC 
INC 
BR 



;!f2$.$LPERR 
tf5$.a*4 
#KIPARO.RO 
#"10. R1 
#-1 .ANDADR 
OR,\DR 
TO MUM 
( .0) 

#2.R0 
R1.2$ 

#1$.$LPERR 

TONUM 

4$ 

10 

#TJMERR.a#4 
TST7 

#4,KSP 
7 



R0,R2 
R2,0RADR 

R2 

R2<,ANDADR 

TONLM 

3$ 



SET LOOP ON ERROR POINT^^R TO 2$ 
SET TIMEOUT VECTOR TO 5$ 
LOAD RO WITH ADDRESS OF FIRST REG. 
LOAD R1 WITH LOOP COUNT (8) 
INITIALIZE "AND" OF ADDR. LOC 
INITIALIZE 't)R" OF ADDR. LOC. 
INITIALIZE '7IME0UTS" COUNTER 
TRY ADDRESSING A KIPAR 
IF IT TIMES OUT. WILL GO TO 5$ 
PUT NEXT KIPAR ADDRESS IN RO 
LOOP BACK TO 2$ UNTIL ALL TESTED 
RESET LOOP ON ERROR POINTER TO 1$ 
DID ANY OF THE KIPARS TIME OUT? 
BRANCH IF NO 

SUMMARY OF KIPAR TIMEOUTS 

RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 

;G0 TO NEXT TEST 

CLEAN UP THE STACK 
ONE OF THE KIPARS TIMED OUT 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2$" = 000756 

LOAD THE ADDRESS THAT TIMED OUT INTO R2 
•lOR" IT WITH OTHER ADDRS. THAT TIMED OUT 
'AND" IT WITH OTHER ADDRS. THAT TIMED OUT 

.-INCREMENT THE TIMEOUT COUNTER 
.-BRANCH BACK TO TEST THE NEXT KIPAR 



•»»*»»*****»»*»»****************»**»******»*»»*»*»»*»*»**»»*»»»» 

iTEST 7 KERNEL PDR'S TIMEOUT TEST 

* 

* THIS TEST ADDRESSES THE EIGHT (8) KERNEL PAGE DESCRIPTOR 

* REGISTERS (KIPDR0-KIPDR7) AND CHECKS THAT SOMETHING 

* RESPONDS TO THEIR ADDRESSES. 
* 

• *************************************************************** 

TST7: SCOPE 



001110 
000004 



1$; MOV *2$.$LPERR 

MOV tt5%.^ttt* 

MOV /ifKIPDRO.RO 

MOV *10.R1 



SET LOOP ON ERROR POINTER TO 2$ 
SET TIMEOUT VECTOR TO 5$ 
LOAD RO WITH ADDRESS OF FIRST REG. 
LOAD R1 WITH LOOP COUNT (8) 
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T7 KERNEL PDR'S TIMEOUT TEST 



SEO 0034 



1S98 


V'C ■•tit 


012737 

VIC' -Jf 


1 7777'' 




WC 1 He V 


OOS037 


CO 1 30? 

W 1 JVC 


1600 




005037 


001 304 


1 wv 1 




005710 




1 DV/C 












062700 

WC t vv 


000002 

w wvc 


1604 


021436 


077104 




160S 


0P1AA0 


012737 

VIC' J ' 


021 366 

VC 1 J\J\J 


1606 


0?1A46 


005737 


001 304 

VV 1 J\J~ 


1607 


021452 

VC I ~ ^ c 


001401 




1608 


021454 


1 0401 0 

1 V~V 1 V 




1609 


021456 


012737 

VIC' ' 


002076 

VVC V f w 


1610 


021464 


000414 




1611 








1612 


021466 


062706 


000004 

V W V v~ 


1613 


021472 

VC 1 ~ » fc 


104007 




1614 








1615 








1616 








1617 


C21474 


010002 




1618 


021476 


050237 


001 302 


1619 


021 502 


005102 




1620 


021 504 


040237 


001300 


1621 


021510 


005237 


001 304 


1622 


021514 


000746 




1623 








1624 








1625 








1626 








1627 








1628 








1629 








1630 








1631 








1632 


021516 


000004 




1633 








1634 


021520 


012737 


021 562 


1635 


021 526 


012737 


021620 


1636 


021534 


012700 


1 77640 


1637 


021540 


012701 


000010 


1638 


021 544 


012737 


"[77777 


1639 


021552 


005037 


001 302 


1640 


021556 


005037 


001304 


1641 


021 562 


005710 




1642 








1643 


021564 


062700 

VwC ' W 


000002 

W W W wc 


1644 


021570 


077104 




1645 


021572 


012737 


021520 


1646 


021600 


005737 


001 304 


1647 


021604 


001401 




1648 


021606 


104010 




1649 


021610 


012737 


002076 


1650 


021616 


000414 




1651 








1652 


021620 


062706 


000004 


1653 


021624 


104007 





001300 



2*: 
3$: 



001110 



000004 4S: 
5$: 



MOV 
CLR 
CLR 
TST 

ADD 

S08 

MOV 

TST 

BEQ 

ERROR 

MOV 

BR 

ADD 
ERROR 



MOV 
BIS 
COM 
BIC 
INC 
BR 



#-1 .ANDADR 
ORADR 
TONUM 
(RO) 

*2.R0 
R1.2$ 

*1$,$LPERR 

TONUM 

4S 

10 

#TIMERR.a#4 
TST10 

#4.KSP 
7 



R0,R2 
R2, ORADR 
R2 

R2, ANDADR 

TONUM 

3S 



.•INITIALIZE "AND" OF ADDR. LOC 
.•INITIALIZE 'W OF ADDR. LOC. 
.•INITIALIZE •7IME0UTS" COUNTER 
:TRY ADDRESSING A KIPDR 
;IF IT TIMES OUT. WILL GO TO 5$ 
;PUT NEXT KIPDR ADDRESS IN RO 
.•LOOP BACK TO 2$ UNTIL ALL TESTED 
.•RESET LOOP ON ERROR POINTER TO 1$ 
;DID ANY OF THE KIPDRS TIME OUT? 
.•BRANCH IF NO 

.•SUMMARY OF KIPDR TIMEOUTS 

.•RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 

;;G0 TO NEXT TEST 

.•CLEAN UP THE STACK 
;ONE OF THE KIPDRS TIMED OUT 
.-FOR TIGHTER SCOPE LOOP 
.•REPLACE ERROR CALL WITH 
.••BR 2$" = 000756 

;LOAD THE ADDRESS THAT TIMED OUT INTO R2 
;'t)R" IT WITH OTHER ADDRS. THAT TIMED OUT 
;"AND" IT WITH OTHER ADDRS. THAT TIMED OUT 

.•INCREMENT THE TIMEOUT COUNTER 
.•BRANCH BACK TO TEST THE NEXT KIPDR 



• •*•*******••***************••• ********************************* 

•TEST 10 USER PAR'S TIMEOUT TEST 

* THIS TEST ADDRESSES THE EIGHT (8) USER PAGE ADDRESS 

* REGISTERS (UIPAR0-UIPAR7) AND CHECKS THAT SOMETHING 

* RESPONDS TO THEIR ADDRESSES. 
* 

************************* ***********************************»*** 

TSTIO: SCOPE 



001 no 

000004 



001300 



1$: 



001110 



000004 



2$: 
3$: 



4$: 
5$: 



MOV 


#2$.$LPERR 


MOV 


A5$.a#4 


MOV 


WIPARO.RO 


MOV 


#10. Rl 


MOV 


#-1 .ANDADR 


CLR 


ORADR 


CLR 


TONUM 


TST 


(RO) 


ADD 


*2.R0 


SOB 


R1.2$ 


MOV 


#1$.$LPERR 


TST 


TONUM 


BEO 


4S 


ERROR 


10 


MOV 


#TIMERR.a«4 


BR 


TST11 


ADD 


#4.KSP 


ERROR 


7 



.-SET LOOP ON ERROR POINTER TO 2$ 
;SET TIMEOUT VECTOR TO 5$ 
.•LOAD RO WITH ADDRESS OF FIRST REG. 
;LOAD R1 WITH LOOP COUNT (8) 
.•INITIALIZE "ANn" OF ADDR. LOC 
.•INITIALIZE 'WOF ADDR. LOC. 
.•INITIALIZE •7IME0UTS" COUNTER 
.-TRY ADDRESSING A UIPAR 
;IF IT TIMES OUT. WILL GO TO 5$ 
;PUT NEXT UIPAR ADDRESS IN RO 
.•LOOP BACK TO 2$ UNTIl UL TESTED 
; RESET LOOP ON ERROR PuINTER TO 1$ 
.-DID ANY OF THE UIPARS TIME OUT? 
.•BRANCH IF NO 

.•SUMMARY OF UIPAR TIMEOUTS 

.•RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 

;;G0 TO NEXT TEST 

.•CLEAN UP THE STACK 

;ONE OF THE UIPARS TIMED OUT 
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i£0 0035 













1 










1 O^O 












\)C 1 OcO 


010002 






1 o^o 




0S0237 


001 302 

WW 1 J\JC 




1 A<^(} 
1 D J~ 


yjc 1 o.^*f 


00S102 

\J\J J 1 wc 








yjc 1 0.JU 


040237 


001 300 

WW 1 J\J\J 




1 QO 1 






001 304 

WW 1 Jw" 






n?16A6 


000746 

WWW' *tw 


































































1 oo^ 










1 A7n 










1 Or 1 










1 Or C 


vc 1 O^v 


000004 

wwwvv*t 






1 Or J 








001110 


1 Or 


0P165? 

WC 1 w^c 


012737 

V 1 C ' -/' 


021714 




0P1660 

wc I www 


012737 


021752 


000004 


1676 


0P1666 

wc I www 


01 2700 

W I C ' w 


1 77600 




1677 


0P1672 

WC 1 Wr C 


012701 


00001 0 

www 1 w 




1678 


0P1676 

WC 1 Wr W 


012737 


1 77777 


001300 

WW 1 ^WW 


1679 


0?1 704 

wC 1 r w"* 


005037 


001 302 

WW 1 ^ wc 






0?1 71 0 


005037 


001 304 

WW 1 ^w~ 




1681 


021 7K 


005710 

WW*/ ' ' w 






168? 










1683 


021716 

WC 1 ' 1 w 


062700 

W WC I WW 


000002 

W W WC 




168^ 


021722 


0771 OA 






1685 

1 Ow^ 


021 724 


012737 


021652 

WC I w^ c 


001 110 


1686 


WC I r -JC 


005737 

WW^ f -mJ' 


001 304 

WW 1 -J w~ 




1687 


021 736 


001401 






1688 

1 WWW 


021740 

Wb 1 • ~w 


104010 






1689 

1 WW r 


021 7A2 

WC 1 • ~t 


012737 

W ■ ' ^ ' 


002076 


000004 

V W V V w » 


1690 


021 750 


000414 

WWW"* 1 ~ 






1691 










1 WTC 


021 752 


062706 

WWC f WW 


000004 

WWWWW^ 




1 W7 J 


021756 

WC 1 r ''W 


104007 

1 W"t WW ' 






1 OT*t 










1 W7 J 










1696 

1 W7W 










1697 


021 760 

WC 1 • WW 


010002 

W 1 wwwc 






1698 


021762 

WC 1 r WC 


050237 

W^WC -J ' 


001302 

WW 1 ^wc 




1699 

1 W~7 


021766 

WC I • WW 


005102 

WW^ 1 wc 






1700 


021 770 


040237 

W^ WC -J ' 


001 300 

W 1 w 




1701 


021 774 


005237 

WW^C -J f 


001 304 

WW 1 




1702 


022000 


000746 

WWW ' ~w 






1703 










170A 










1705 










1706 










1707 










1708 










1709 











MOV 
BIS 
COM 
BiC 
INC 
BR 



R0.R2 

R2.0RADR 

R2 

R2.ANDADR 

TONUM 

3$ 



.-FOR TIGHTER SCOPE LOOP 
.■REPLACE ERROR CALL WITH 
.••BR 2$" = 000756 

.•LOAD THE ADDRESS THAT TIMED OUT INTO R2 
.••TOR" IT WITH OTHER ADDRS. THAT TIMED OUT 
.••'AND'^ IT WITH OTHER ADDRS, THAT TIMED OUT 

.•INCREMENT THE TIMEOUT COUNTER 
.•BRANCH BACK TO TEST THE NEXT UIPAR 



**************************************************************** 

West ii user pdr's timeout test 

* this test addresses the eight (8) user page descriptor 

* registers (uipdr0-uipdr7) and checks that something 

* responds to their addresses. 

* 

•*********•**•»**•••»* ****************************************** 

TST11: SCOPE 



1$: 



2$: 
3$: 



4$: 



5$: 



MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
TST 

ADD 

soe 

MOV 

TST 

BEO 

ERROR 

MOV 

BR 

ADD 
ERROR 



MOV 
BIS 
COM 
BIC 
INC 
BR 



/ir2$.$LPERR 

*-! .ANDADR 
ORADR 
TONUM 
(RO) 

*2.R0 
R1.2$ 

*1$,$LPERR 

TONUM 

4$ 

10 

/irTIMERR.aCA 
TST12 

#4.KSP 

7 



R0.R2 
R2, ORADR 
R2 

R2. ANDADR 

TONUM 

3$ 



;SET LOOP ON ERROR POINTER TO 2$ 
;SET TIMEOUT VECTOR TO 5$ 
.•LOAD RO WITH ADDRESS OF FIRST REG. 
;LOAD R1 WITH LOOP COUNT (8) 
.•INITIALIZE "AND" OF ADDR. LOC 
.•INITIALIZE 'W OF ADDR. LOC. 
.•INITIALIZE "TIMEOUTS" COUNTER 
;TRY ADDRESSING A UIPDR 
;IF IT TIMES OUT, WILL GO TO 5$ 
;PUT NEXT UIPDR ADDRESS IN RO 
.•LOOP BACK TO 2$ UNTIL ALL TESTED 
.•RESET LOOP ON ERROR POINTER TO 1$ 
.-DID ANY OF THE UIPDRS TIME OUT? 
.•BRANCH IF NO 

.•SUMMARY OF UIPDR TIMEOUTS 

;RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 

;;60 TO NEXT TEST 

.•CLEAN UP THE STACK 
;ONE OF THE UIPDRS TIMED OUT 
;FOR TIGHTER SCOPE LOOP 
.•REPLACE FRROR CALL WITH 
.-•BR 2%" = 000756 

.•LOAD THE ADDRESS THAT TIMED OUT INTO R2 
:'XJR" IT WITH OTHER ADDRS. THAT TIMED OUT 
.-"AND" IT WITH OTHER ADDRS. THAT TIMED OUT 

.•INCREMENT THE TIMEOUT COUNTER 
.•BRANCH BACK TO TEST THE NEXT UIPDR 



»»*»***♦♦♦♦*♦♦»»♦*♦*♦»***♦************************************* 

TEST 12 SR0(15:13) BIT TEST I SR2 TEST 

THIS TEST CHECKS BITS <15:13> OF STATUS REGISTER 0 TO SEE 
THAT EACH CAN BE SET AND CLEARED AND THAT A "T^ESET" WILL 
CLEAR ALL OF THEM. 
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1710 






171 1 






1712 






1713 






1 714 






1715 


022002 


000004 


1716 






1 71 7 


022004 


Ai 07AA 

012700 


1 no 


022010 


A1 A 

012710 


1719 


02201 4 


AAAAAC 

000005 


4 7^rt 

1720 


022016 


Ail AA 1 

01 1001 


1721 


022020 


AAi / AI 

001401 


1722 


022022 


4 Ay Ai i 

10401 1 


1 7"iT 

1723 






i 7"^y 

172A 






1 725 






1 /'26 




A1 0777 


1 7*^7 

\727 




A-l 7777 

01 3737 


1728 


AT5Ay A 

022040 


Ai '57Ai 

01*: 701 


1 ^29 


Ctc044 


A'5Ai 77 
OifOl 37 


1/^30 


022050 


AAi y Ai 
001401 


1731 


022052 


i Ay Ay i 
104041 


1 /^32 






1 /'33 






1 






1735 


0<:<:U54 


Ai 0777 

01 ^:^3r 


1 736 


OddVod 


Ai 0701 

Olcf 01 






m 07n7 
01 cr 03 


1 r 38 


022072 


AACA1 A 
005010 


1 7TQ 


rtOOA7/ 


0501 10 


1 7y rt 


{JccUfO 


Ai i AAO 

onooc 


1 7y 1 

1 741 


A "5 1 AA 


AOA1 AO 

OcOlO^ 


1 742 


022102 


AAI y Ai 

001401 


1 r43 


A001 Ay 
022104 


10401c 


1 7/ y 

1 744 






1 7/ C 






1 7/ ^ 

1 746 






1 7/ 7 

1 747 


A i A^ 


Ai o7i^y 
01*: 704 


^ 7/ O 

1 748 


02211 2 


Ai 7777 

01 3737 


^ 7/ n 
1 749 


022120 


AOAy 77 

0c0437 


1750 






1 fbl 


0221 2h 


AAi y AI 
001401 


1752 


ATH 

0221 26 


i Ay A^y 
104064 


1 733 






1 7C/ 

1 734 






1 7CC 






1 756 


A001 7A 

Occl 3U 


AAiLAAl 

OOoOOl 


i 7C 7 




A7770i 


i 7CO 

1 75o 


0221 34 


AACAi A 
005010 


1 7^Q 

1 rj7 




Ai 0777 

KJicfJf 


1760 






1761 






1762 






1763 






1764 






1765 
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T12 SR0(15:13) BIT TEST & SR2 TEST 

THE REST OF BITS IN SRO WILL BE CHECKED LATER. 
ALSO CHECK THAT SR2 IS TRACKING WITH MEM. MGMT. 
OFF BUT LOCKS UP WHEN ANY OF SRO ERROR BITS SET. 

***•***•»*•*»*•»»••***»**•*••*********•*•**•••»•*••*••••••••••• 

tST12: SCOPE 



SEO 0036 



177572 
160000 



1$: MOV tfSRO.RO 

MOV *1 60000, (RO) 
RESET 

MOV (R0),R' 

BEQ 2S 

ERROR 1 1 



022024 
1 77576 
022032 
001274 



022072 
100000 
000003 



001110 2$: 
001274 8$: 



001110 3$: 



4$: 
5$: 



022074 
177576 
001274 



001274 



022004 001110 



MOV *2$,$LPERR 

MOV SR2.WASSR2 

MOV m.Ri 

CMP R1.WASSR2 

BEQ ::$ 

ERROR 4 ; 



MOV *4$.$LPERR 

MOV *8IT15.R1 

MOV *3.R3 

CLR (RO) 

BIS R1.(R0J 

MOV (RO) ,R2 

CMP R1.R2 

BEQ 6$ 

ERROR 12 



6$: MOV /lf5$.R4 

MOV SR2.WASSR2 

CMP R4,WASSR2 

BEQ 7$ 

ERROR 64 



7$: ROR R1 

508 R3.4$ 

CLR (RO) 

MOV *1$,$LPERR 



LOAD ADDRESS OF SRO INTO RO 

SET BITS <15:13> IN SRO (ERROR BITS) 

ISSUE AND "INIT" SIGNAL 

READ SRO INTO R1 TO SEE IF CLEAR 

BRANCH IF SR0<15:13> CLEARED BY "INIT' 

SR0<15:13> NOT CLEARED BY A 'T?ESET" 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 1$" = 000770 

SET LOOP ON ERROR POINTER TO 2$ 

READ CONTENTS OF SR2 

LOAD EXPECTED CONTENTS INTO R1 

IS SR2 TRACKING? 

BRANCH IF YES 

SR2 NOT * BRACKING" VIRTUAL ADDRESSES 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000767 

SET LOOP ON ERROR POINTER TO 4$ 

PUT DATA TO BE WRITTEN IN R1 

SETUP R3 AS A LOOP COUNTER 

CLEAR SRO 

SET ONE OF THE ERROR BITS IN SRO 

READ SRO INTO R2 

DID RIGHT ERROR BIT GET SET? 

BRANCH IF YES 

BITS WERE SET WRONG IN SRO 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 4$" = 000772 

LOAD EXPECTED CONTENTS OF SR2 IN R4 
READ SR2 

DID SR2 LOCK UP WHEN ERROR 

BIT SET IN SRI? 

BRANCH IF YES 

SR2 DID NOT LOCK UP 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 4$" = 000761 

CHANGE DATA TO CHECK NEXT ERROR BIT 
LOOP BACK UNTIL <15:13> ALL TESTED 
CLEAR SRO BEFORE LEAVING 
RESET LOOP ON ERROR POINTER TO 1$ 



West 13 sro a psw dual addressing test 

* THIS test CHECKS MORE OF THE ADDRESS DETECTION LOGIC BY 

• VERIFYING THAT STATUS REGISTER 0 IS NOT EFFECTED BY WRITING 



022 K4 000004 



022K6 
022152 
022156 
022162 
022166 
022170 



0221 72 
022176 



005037 
005037 
106427 
013700 
00K01 
104013 



005037 
005037 



022202 
022204 
022210 
022214 
022216 



022220 
022226 
022234 
022236 
022240 
022244 
022246 
022252 
022254 
022260 
022262 
022264 
022270 
022270 
02227? 



000004 
012700 
013700 
001401 
104014 



1 7777t 
}77S72 
000340 
^77^72 



\77'^72 
\77776 
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1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

1776 

1777 

1778 

1779 

1780 

1781 

1782 

1783 

1784 

1785 

1786 

1787 

1788 

1789 

1790 

1791 

1792 

■•793 

1794 

1795 

1796 

1797 

1798 

1799 

1800 

1801 

1802 

1803 

1804 

1805 

1806 

1807 

1808 

1809 

1810 

1811 

1812 

1813 

1814 

1815 

1816 

1817 

1818 

1819 

1820 

1821 
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T13 SRO ft PSW DUAL ADDRESSING TEST 

TO THE PSW AND THAT THE LOW BYTE OF STATUS REGISTER 0 
IS NOT EFFECTED BY WRITING TO ITS HIGH BYTE. THIS IS TO 
SEE IF ADJACENT OUTPUTS ARE SHORTED ON THE ADDRESS DET. LOGIC. 

»»♦»**♦»»»**»»»*»*»»»***»»»»»»*»»*♦»»»♦♦*»**♦»**♦*»♦♦*»*»»»**»• 

tST13: SCOPE 



SEQ 0037 



IS: 



2$: 



CLR 

CLR 

MTPS 

MOV 

BEQ 

ERROR 



CLR 
CLR 



PSW 
SRO 

*3;o 

SRO,RO 
2$ 

13 



SRO 
PSW 



CLEAR THE PSW 

CLEAR STATUS REGISTER 0 

SET PRIORITY 7 IN LOW BYTE OF PSW 

READ STATUS REGISTER 0 

BRANCH IF IT WAS STILL 0 

SRO EFFECTED BY A WRITE TO THE PSW 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 1$" = 000767 

BE SURE SRO IS 0 BEFORE LEAVING 

BE SURE PSW IS 0 BEFORE LEAVING 



^77777 
y77'i7t. 



012737 


^77777 


172516 


2$: 


MOV 


*-1,SR3 


022737 


000060 


172516 




CMP 


*60.SR3 


001401 








BEQ 


3$ 


104012 








ERROR 


12 


105737 


001246 




3$: 


TST8 


a/y$ENV 


001406 








BEQ 


6S 


005737 


001234 






TST 


cMTSPASS 


001403 








BEQ 


6$ 


005037 


172516 






CLR 


SR3 


000401 








BR 7$ 




000005 






6$: 


RESET 




005737 


172516 




7$: 
4$: 


TST 


SR3 


001401 








BEQ 


TST15 


104012 








ERROR 


12 



'•TEST 14 TEST THAT SRI READS ALL ZEROS 

* THIS TESTS CHECKS THAT STATUS REGISTER 1 

» RESPONDS WITH ALL ZEROS, AND THAT ONLY BITS<5:4> 

* OF STATUS REGISTER 3 ARE WRITEABLE. 
* 

•»»*»»»♦*♦**♦*•*♦****»*•♦*♦»♦**»»•♦**♦•*»♦♦♦♦♦**♦♦♦»♦♦♦»»*»**»»* 

TST14: SCOPE 

1$: MOV *-1.R0 ;FILL RO WITH ALL ONES 

MOV SR1.ro .-read SRI INTO RO 

BEQ 2$ .-BRANCH IF SRI READS ALL ZEROS 

ERROR 14 ;SR1 DID NOT READ ALL ZEROS 

;FOR TIGHTER SCOPE LOOP 
.•REPLACE ERROR CALL WITH 
.-000772 

;TRY TO WRITE ONES TO SR3 
.-ONLY BITS <5:4> SHOULD BE ONES 

.-DIDN'T READ BACK A "60" 
;TEST APT ENVIRONMENT BIT 
;IF CLEAR. NOT ON APT SO DO TEST 
;IF ON APT TEST PASS COUNTER 
;IF CLEAR. FIRST PASS SO DO TEST 
;IF ON APT AND NOT FIRST PASS FUDGE TEST 

.•CLEARS SR3 

.-VERIFY THAT IT WAS CLEARED 

.-.•BRANCH IF SR3 READ ALL ZEROS 
;SR3 DIDN'T READ ALL ZEROS 



■♦»»••»♦♦»»♦»»»»»»»»»••♦»•»»»»»*»»•»»»»»»»»»••»»•»•••*»•*•«•••»• 



.■•TEST 15 



BIT TEST OF KERNEL & USER PAR'S 



022271* 


000004 




TST15: 


SCOPE 




02227 t 


012700 


172340 


1$; 


MOV 


#KIPARO,RO 


022102 


012703 


000010 


2$: 


MOV 


#10. R3 


022306 


012737 


0223U 0011 10 




MOV 


#3i.$LPERR 


0223K 


005010 




3$: 


CLR 


(R0> 


022316 


011001 






MOV 


(RO).RI 


022320 


0OU01 






BEQ 


4$ 


022322 


104011 






ERROR 


11 



022324 
022330 
022336 
022340 
022342 
022344 
022346 
022350 
022352 



022354 
022356 
022360 
022362 
022366 
022370 
022374 
022376 
022402 
022404 



012704 
012737 
005010 
050410 
011002 
020402 
001402 
010401 
104012 



000261 
006004 
103766 
062700 
077326 
022700 
103003 
012700 
000737 
012737 



022412 000004 



022414 
022420 
022424 
022432 
022434 



012700 
012703 
012737 
005010 
011001 



077777 
022336 
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1822 

1823 

1824 

1825 

1826 

1827 

1828 

1829 

1830 

1831 

1832 

1833 

1834 

1835 

1836 

1337 

1838 

1839 

1840 

1841 

1842 

1843 

1844 

1845 

1846 

1847 

1848 

1849 

1850 

1851 

1852 

1853 

1854 

1855 

1856 

1857 

1858 

1859 

1860 

1861 

1862 

1863 

1864 

1865 

1866 

1867 

1868 

1869 

1870 

1871 

1872 

1873 

1874 

1875 

1876 

1877 



001110 



4$ 
5$ 



000002 
1 77660 
177640 
022276 
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T15 BIT TEST OF KERNEL £ USER PAR'S 

► THE FOLLOWING TEST CHECKS THE BITS <15:00> OF BOTH THE KERNEL 

► AND USER PAGE ADDRESS REGISTERS. A "0" IS ROTATED THRU 
» THE REGISTERS FROM LEFT TO RIGHT. 

LOAD ADDRESS OF FIRST PAR IN RO 
SETUP R3 TO COUNT 8 PAR'S 
SET LOOP ON ERROR POINTER TO 3$ 
CLEAR THE PAR 
READ THE PAR INTO R1 
BRANCH IF PAR CLEARED 0< 
PAR WOULD NOT CLEAR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
' BR 3$' ' = 000774 

LOAD 'TALKING 0" TEST PATTERN IN R4 
SET LOOP ON ERROR POINTER TO 5$ 
CLEAR THE PAR BEFORE LOADING DATA 
BIT SET THE TEST PATTERN INTO THE PAR 
READ THE PAR INTO R2 
DOES DATA WRITTEN=OATA READ? 
BRANCH IF YES 
SETUP FOR ERROR REPORTING 
PAR BITS DID NOT SET CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 5S" = 000767 

SET THE C-eiT FOR THE ROTATE INST. 
ROTATE THE TEST PATTERN IN R4 
BRANCH BACK IF MORE BITS TO TEST 
GET NEXT PAR ADDRESS IN RO 
BRANCH BACK UNTIL ALL PAR'S TESTED 
HAVE USER PAR'S BEEN TESTED 
BRANCH IF YES 

LOAD FIRST USER PAR ADDR. IN RO 
BRANCH BACK TO TEST USER PAR'S 
RESET LOOP OR ERROR POINTER TO 1$ 
LEAVE TEST WITH BITS <11:1>=1 IN ALL PAR'S 

•************< 

'•TEST 16 
* 

THE FOLLOWING TEST CHECKS THE BITS <14:8> AND <3:1> OF BOTH THE 
KERNEL AND USER PAGE DESCRIPTOR REGISTERS. A "O" IS ROTATED 
THRU THE REGISTERS FROM LEFT TO RIGHT. SOME TEST PATTERNS WILL 
BE LOADED MORE THAN ONCE DUE TO THE UNUSED BITS IN THE PDR'S. 



SEO 0038 



6$ 



001110 7$: 



MOV 
MOV 
CLR 
BIS 
MOV 
CMP 
BEQ 
MOV 
ERROR 



SEC 

ROR 

BCS 

ADD 

SOB 

CMP 

BHIS 

MOV 

BR 

MOV 



*077777, R4 

#5$.$LPERR 

(RO) 

R4,(R0) 

(R0),R2 

R4,R2 

6$ 

R4.R1 
12 



R4 
5$ 

tt2. RO 
R3,3$ 

/)'UIPAR7*2.R0 
7$ 

/IfUIPARO.RO 
2$ 

AflS.SLPERR 



**************************************************** 



BIT TEST OF KERNEL & USER PDR'S 



*************************************************************** 

TST16: SCOPE 

LOAD ADDRESS OF FIRST PDR IN RO 
SETUP R3 TO COUNT 8 PDR'S 
SET LOOP ON ERROR POINTER TO 3$ 
CLEAR THE PDR 
READ THE PDR INTO R1 



172300 


1$: 


MOV 


#KJPDRO,RO 


000010 


2$: 


MOV 


*10,R3 


022432 001 no 




MOV 


#3$.$LPERR 




3$: 


CLR 


(RO) 






MOV 


(R0),R1 
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T16 BIT TEST OF KERNEL & USER PDR'S 



SEO 0039 



1878 

1879 

1880 

1881 

1882 

1883 

1884 

1885 

1886 

1887 

1888 

1889 

1890 

1891 

1892 

1893 

1894 

1895 

1896 

1897 

1898 

1899 

1900 

1901 

1902 

1903 

1904 

1905 

1906 

1907 

1908 

1909 

1910 

1911 

1912 

1913 

19K 

1915 

1916 

1917 



022436 
022440 



022442 
022446 
022454 
022456 
022460 
022464 
022466 
022470 
022472 
022474 



022476 
022500 
022502 
022504 
022510 
022512 
022516 
022520 
022524 
022526 



001401 
104011 



012704 
012737 
005010 
010401 
042701 
050110 
011002 
020102 
001401 
104012 



000261 
006004 
103764 
062700 
077330 
022700 
103003 
012700 
000735 
012737 



077777 
022454 



100361 



000002 
1 77620 
177600 
022414 



BEQ 4S 
ERROR 1 1 



4$: MOV /t077777,Rii 

001110 MOV *5$,$LPERR 

5$: CLR (R0> 

MOV R4.R1 

BIC *100361,R1 

BIS R1,(R0) 

MOV (RO) .R2 

CMP Rl ,R2 

BEQ 6$ 

ERROR 12 



6$: SEC 

ROR R4 

BCS 5$ 

ADD #2,R0 

S08 R3.3$ 

CMP #UIPDR7*2,R0 

BHJS 7$ 

MOV #UIPDRO,RO 

BR 2$ 

001110 7$: MOV *1$,$LPERR 



.•BRANCH IF PDR CLEARED OK 
;PDR WOULD NOT CLEAR 
;FOR T.6HTER SCOPE LOOP 
.•REPLACE ERROR CALL WITH 
;'8R 3$" - 000774 

;L0AD 'TALKING "0" TEST PATTERN IN R4 

;S£T LOOP ON ERROR POINTER TO 5$ 

.CLEAR THE PDR BEFORE LOADING DATA 

.•LOAD DATA INTO Rl 

.•MASK UNUSED BITS OUT OF THE DATA 

;8IT SET THE TEST PATTERN INTO THE PDR 

.-READ THE PDR INTO R2 

.-DOES DATA WRITTEN=DATA READ? 

.BRANCH IF YES 

;PDR BITS DID NOT SET CORRECTLY 
;FOR TIGHTER SCOPE LOOP 
.•REPLACE ERROR CALL WITH 
;'13R 5$" = 000767 

;SET THE C-BIT FOR THE ROTATE INST. 
.•ROTATE THE TEST PATTERN IN R4 
.•BRANCH BACK IF MORE BITS TO TEST 
;GET NEXT PDR ADDRESS IN RO 
.•BRANCH BACK UNTIL ALL PDR'S TESTED 
;HAVE USER PDR'S BEEN TESTED? 
.•BRANCH IF YES 

;LOAD FIRST USER PDR ADDR. IN RO 
.•BRANCH BACK TO TEST USER PDR'S 
;RESET LOOP ON ERROR POINTER TO 1$ 
.•LEAVE TEST WITH ALL WRITEA8LE BITS IN 
;ALL PDR'S = 1 



022534 000004 



•A************************************************************** 

•TEST 17 TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER PAR'S 



THE FOLLOWING TEST WRITES TO BOTH BYTES OF THE KERNEL & USER 
PAR'S SEPERATELY TO SEE THAT WRITING TO ONE DOES NOT EFFECT 
THE OTHER. 



TST17: SCOPE 
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T17 TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER PAR'S 



SEO 0040 



1918 








1919 


022536 


012700 


172340 


1920 


022542 


012737 


022554 


1921 


022550 


012703 


000010 


1922 


022554 


012701 


}77777 


1923 


022560 


005010 




■•924 


022562 


110110 




1925 


022564 


011002 




1926 


022566 


042701 


1 77400 


1927 


022572 


020102 




1928 


022574 


001401 




1929 
"930 


022576 


104015 










1931 








1932 








19i3 


022600 


012737 


022606 


1934 


022o06 


005010 




1935 


022610 


012701 


^77777 


1936 


022614 


110160 


000001 


1937 


C22620 


01100? 




1938 


022622 


042701 


000377 


1939 


022626 


020102 




1940 


022630 


001401 




1941 


022632 


104015 




1942 








1943 








1944 








1945 


022634 


062700 


000002 


1946 


022640 


077333 




1947 


022642 


022700 


1 77660 


1948 


022646 


103003 




1949 


022650 


012700 


1 77640 


1950 


022654 


000732 




1951 


022656 


012737 


022536 


1952 








1953 








1954 








1955 








1956 








1957 








1958 








1959 








1960 








1961 


022664 


000004 




1962 








1963 


022666 


012700 


1 72300 


1964 


022672 


012737 


022704 


1965 


022700 


012703 


000010 


1966 


022704 


012701 


^77777 


1967 


022710 


005010 




1968 


022712 


110110 




1969 


022714 


011002 




1970 


022716 


042701 


\777iA 


1971 


022722 


020102 




1972 


02272^ 


001401 




1973 


022726 


104015 





1$: MOV /TKIPARO.RO 

001110 2$: MOV #3$.$LPERR 

MOV #10. R3 

3$: MOV #-1.R1 

CLR (RO) 

MOVB Rl . (RO) 

MOV (R0).R2 

BIC #177400. Rl 

CMP R1.R2 

BEQ 4$ 

ERROR 15 



001110 4$: MOV #5$.$LPERR 

5$: CLR (RO) 

MOV #-1 .Rl 

MOVB RI.KRO) 

MOV (R0).R2 

BIC #000377. Rl 

CMP R1.R2 

BEQ 6$ 

ERROR 15 



6$: ADD #2.R0 

SOB R3.3$ 

CMP #UIPAR7+2.R0 

BHIS 7$ 

MOV #UIPAkO,RO 

BR 2$ 

001110 7$: MOV #1$.$LPERR 



.•LOAD ADDRESS OF FIRST PAR INTO RO 
.-SET LOOP ON ERROR POINTER TO 3S 
.•LOAD LOOP COUNTER TO DO 8 PAR'S 
;LOAD TEST PATTERN INTO Rl 
'CLEAR THE PAR 

;WRITE rs TO THE LOW BYTE OF THE PAR 

;READ THE ENTIRE PAR INTO R2 

;MASK HIGH BYTE & UNUSED BITS OUT OF THE DATA 

;WAS ONLY THE LOW BYTE WRITTEN TO 

.•BRANCH IF YES 

.-HIGH BYTE EFFECTED BY WRITING LOW BYTE IN PAR 

;FOR TIGHTER SCOPE LOOP 

.•REPLACE ERROR CALL WITH 

;'BR 3$" = 000766 

;SET LOOP ON ERROR POINTER TO 5$ 

.•CLEAR THE PAR 

.•LOAD TEST. PATTERN INTO Rl 

;WRITE rs TO THE HIGH BYTE OF THE PAR 

;READ THE ENTIRE PAR INTO R2 

.'MASK LOW BYTE 

;WAS ONLY THE HIGH BYTE WRITTEN TO? 
.•BRANCH IF YES 

.-LOW BYTE EFFECTED BY WRITING HIGH BYTE IN PAR 

;FOR TIGHTER SCOPE LOOP 

.•REPLACE ERROR CALL WITH 

.••BR 5" = 000765 

.-PUT ADDRESS OF NEXT PAR IN RO 

.•BRANCH BACK UNTIL 8 PAR'S TESTED 

;HAVE USER PAR'S BEEN TESTED 

.•BRANCH IF YES 

.•LOAD ADDRESS OF FIRST USER PAR IN RO 
.-BRANCH BACK TO TEST USE ^ PAR'S 
.•RESET LOOP ON ERROR POINTER TO 1$ 



TEST 20 TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER POR'S 

THE FOLLOWING TEST WRITES TO BOTH BYTES OF THE KERNEL 8 USER 
PDR'S SEPERATELY TO SEE THAT WRITING TO ONE DOES NOT EFFECT 
THE OTHER. 

***********»»*»«***»******»**»*»***»»************»************* 

■TST20: SCOPE 



001110 



1$: 
2$: 

3$: 



MOV 

MOV 

MOV 

MOV 

CLR 

MOVB 

MOV 

BIC 

CMP 

BEQ 

ERROR 



#KIPDRO.RO 

#3$.$LPERR 

#10. R3 

#-1 .Rl 

(RO) 

Rl.(RO) 

(R0).R2 

#1 77761. Rl 

R1.R2 

4$ 

15 



LOAD ADDRESS OF FIRST PDR INTO RO 
SET LOOP ON ERROR POINTER TO 3$ 
LOAD LOOP COUNTER TO DO 8 PDR'S 
LOAD TEST PATTERN INTO Rl 
CLEAR THE PDR 

WRITE 1'S TO THE LOW BYTE OF THE PDR 
READ THE ENTIRE PDR INTO R2 
MASK HIGH BYTE & UNUSED BITS OUT OF DATA 
WAS ONLY THE LOW BYTE WRITTEN TO? 
BRANCH IF YES 

HIGH BYTE EFFECTED BY WRITING LOW BYTE IN PDR 
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120 TEST FOR DUAL BYTE ADDRESSING OF KERNEL & USER PDR'S 



SEO 0041 



1975 

'976 

1977 

1978 

1979 

1980 

1981 

1982 

1983 

1984 

1985 

1986 

1987 

1988 

1989 

1990 

1991 

1992 

1993 

199; 

1995 

1996 

1997 

1998 

1999 

2000 

2001 

2002 

2003 

2004 

2005 

2006 

2007 

2008 

2009 

2010 

2011 

2012 

2013 

2014 

2015 

2016 

2017 

2018 

2019 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 



022^30 
022736 
022740 
022744 
022750 
022752 
022756 
022760 
022762 



022764 
022770 
022772 
022776 
023000 
023004 
023006 



012737 
005010 
012701 
110160 
011002 
042701 
020102 
001401 
104015 



062700 
077333 
022700 
103003 
012700 
000732 
012737 



022736 

\77777 
000001 

100377 



001110 4$: 
5$: 



000002 6S: 

177620 

177600 

022666 001110 7$: 



MOV /lf5$.$LPfcRR 

CLR (RO) 

MOV #-l.Rl 

MOVB RI.KRO) 

MOV (RO) .R2 

BIC #100377. Rl 

CMP Rl ,R2 

6EQ 6$ 

ERROR 15 



ADD #2,R0 

SOB R3.3$ 

CMP *UIPDR7+2.R0 

BHIS 7$ 

MOV #UIPDRO,RO 

BR 2$ 

MOV #1$.$LPERR 



FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 3$" = 000766 

SET LOOP ON ERROR POINTER TQ 5$ 

CLEAR THE PDR 

LOAD TEST PATTERN INTO Rl 

WRITE I'S TO THE HIGH BYTE OF THE PDR 

READ THE ENTIRE PDR INTO R2 

MASK LOW BYTE ft UNUSED BITS OUT OF DATA 

WAS ONLY THE HIGH BYTE WRITTEN TO? 

BRANCH IF YES 

LOW BYTE EFFECTED BY WRITING HIGH BYTE IN PDR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 5$" = 000765 

PUT ADDRESS OF NEXT PDR IN RO 

BRANCH BACK UNTIL 8 PDR'S TESTED 

HAVE USER PDR'S BEEN TESTED? 

BRANCH IF YES 

LOAD ADDRESS OF FIRST USER PDR IN RO 
BRANCH BACK TO TEST USER PDR'S 
RESET LOOP ON ERROR POINTER TO 1$ 



023014 000004 



023016 


012737 


023040 


001110 


1$: 


MOV 


*2$.$LPERR 


023024 


012703 


000010 






MOV 


*10,R3 


023030 


012700 


172300 






MOV 


#KIPDRO,RO 


023034 


004737 


035334 






JSR 


PC.SETREG 


023040 


012706 


001100 




2$: 


MOV 


#KERSTK.KSP 


023044 


005010 








CLR 


(RO) 


023046 


004737 


035426 






JSR 


PC.CMPREG 
#-1.v'R0) + 


023052 


012720 


mm 






MOV 


023056 


077310 








SOB 


R3,2$ 


023060 


012737 


023076 


001110 




MOV 


*3$.$LPERR 


023066 


012703 


000010 






MOV 


*10.R3 


023072 


012700 


172340 






MOV 


*KJPAR0.R0 


023076 


012706 


001100 




3$: 


MOV 


#KERSTK,KSP 


023102 


005010 








CLR 


(RO) 


023104 


004737 


035426 






JSR 


PC.CMPREG 


023110 


012720 


\77777 






MOV 


#-1,(R0)+ 


023114 


077310 








508 


R3.3$ 


023116 


012737 


023134 


001110 




MOV 


*4$.$LPERR 


023124 


012703 


000010 






MOV 


*10.R3 



•TEST 21 PAR-PDR DUAL ADDRESSING TEST 

* 

♦ THE FOLLOWING TEST SETS ALL OF THE WRITEABLE BITS TO 1 

* IN THE SIXTEEN (16) PAR'S AND PDR'S USING THE "SETREG" 

* SUBROUTINE AND THEN CLEARS JUST ONE OF THEM. THE "CMPREG" 

* SUBROUTINE IS USED TO READ ALL OF THE PAR'S AND PDR'S TO SEE 
THAT ONLY ONE REGISTER WAS CLEARED IN RESPONSE TO THAT ONE 

• PAR OR PDR ADDRESS. THE "CMPREG" SUBROUTINE REPORTS THE 

• ADDRESS OF ANY REGISTER WHOSE BITS DID NOT REMAIN SET WHEN 
ANOTHER REGISTER WAS CLEARED. 

• ****»*****************»»*******************»******»***********» 

TST21 : SCOPE 

SET LOOP ON ERROR POINTER 2$ 
LOAD LOOP COUNTER WITH AN 8 
LOAD ADDRESS OF FIRST KERNEL PDR AND RO 
SET ALL BITS IN ALL PAR'S IN PDR'b 
SETUP STACK POINTER 
CLEAR ONE OF THE KERNEL PDR'S 
SEE IF OTHER PAR/PDR'S WERE EFFECTED 
RESTORE ALL ONES. AND SETUP FOR NEXT PDR 
LOOP TO 2$ UNTIL ALL KERNEL PDR'S CHECKED 
SET LOOP ON ERROR POINTER TO 3$ 
LOAD LOOP COUNTER WITH AN 8 
LOAD ADDRESS OF FIRST KERNEL PAR IN RO 
SETUP STACK POINTER 
CLEAR ONE OF THE KERNEL PAR'S 
SEE IF OTHER PAR/PDR'S WERE EFFECTED 
RESTORE ALL ONES. AND SETUP FOR NEXT PAR 
LOOP TO 3$ UNTIL ALL KERNEL PAR'S CHECKED 
SET LOOP ON ERROR POINTER TO 4$ 
LOAD LOOP COUNTER WITH AN 8 
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T21 PAR-PDR DUAL ADDRESSING TEST 



SEO 004^ 



2050 

2031 

2032 

2033 

203A 

2035 

2036 

2037 

2038 

2039 

20^,0 

2041 

2042 

2043 

2044 

2045 

2046 

2047 

2048 

2049 

2050 

2051 

2052 

2053 

2054 

2055 

20:6 

2057 

2058 

2059 

2060 

2061 

2062 

2063 

2064 

2065 

2066 

2067 

2068 

2069 

2070 

2071 

2072 

2073 

2074 

2075 

2076 

2077 

2078 

2079 

2080 

2081 

2082 

2083 

2084 

2085 



023130 
023134 
023140 
023142 
023146 
023152 
023154 
023162 
023166 
023172 
0231 76 
023200 
023204 
023210 
023212 



023222 
023226 
023230 
023234 
023236 
023242 
023244 
023250 
023254 
023256 
023262 
023264 



023266 
023272 
023274 
023300 
023304 
023306 
023312 
023314 



012700 
012706 
005010 
004737 
012720 
077310 
012737 
012703 
012700 
012706 
005010 
004737 
012720 
077310 
012737 



023220 000004 



105737 
001403 
005737 
001063 
004737 
000005 
012700 
012704 
011001 
022701 
001401 
104055 



062700 
077410 
012700 
012704 
011001 
022701 
001401 
104055 



1 77600 
001100 

035426 
Mim 

02V 72 001110 
000010 
177640 
001100 

035426 
^77777 

023016 001110 



4S: 



5$: 



MOV 
MOV 
CLR 
JSR 
MOV 
S08 
MOV 
MOV 
MOV 
MOV 
CLR 
JSR 
MOV 
S08 
MOV 



#UIPDR0.R0 

#KERSTK.KSP 

(RO) 

PC.CMPREG 
#-1,(R0)* 
R3,4$ 

*5S.$LPERR 

*10.R3 

#UIPARO,R0 

(/k:rstk,ksp 

(RO) 

PC.CMPREG 
#-l,(RO)* 
R3,5$ 
*1$,$LPERR 



LOAD ADDRESS OF FIRST USER PDR IN RO 

SETUP STACK POINTER 

CLEAR ONE OF THE USER PDR'S 

SEE IF OTHER PAR/PDR'S WERE EFFECTED 

RESTORE ALL ONES, AND SETUP FOR NEXT UPDR 

LOOP TO 4S UNTIL ALL USER PDR'S CHECKED 

SET LOOP ON ERROR POINTER TO 5$ 

LOAD LOOP COUNTER WITH AN 8 

LOAD ADDRESS OF FIRST USER PAR IN RO 

SETUP STACK POINTER 

CLEAR ONE OF THE USER PAR'S 

SEE IF OTHER PAR/PDR'S WERE EFFECTED 

RESTORE ALL ONES. AND SETUP FOR NEXT UPAR 

LOOP TO 5$ UNTIL ALL USER PAR'S CHECKED 

SET LOOP ON ERROR POINTER TO 1$ 



001246 

001234 

035334 

172300 
000010 

077416 



000002 

1 72340 
000010 

\77777 



iTEST 22 TEST THAT PAR-PDR'S NOT AFFECTED BY RESET 



THIS TEST CHECKS TO SEE THAT THE KERNEL OR USER "AR/PDR'S ARE 
NOT AFFECTED BY THE EXECUTION OF A 'T^ESET" INSTRUCTION. THE 
"SfcTREG" Sl^ROUTINE IS USED TO SET ALL WRITEA8LE BITS TO A 'T* IN 
THE PAR/PDR'S. THEN THEY ARE READ TO SEE THAT THEY REMAINED 
UNCHANGED 



*************************************************************** 

tST22: SCOPE 



IS: 



2S: 



3$: 
4$: 



TST8 

BEO 

TST 

BNE 

JSR 

RESET 

MOV 

MOV 

MOV 

CMP 

BEO 

ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 
BEO 
ERROR 



a«$ENV 

1$ 

WSPASS 
10$ 

PC.SETREG 

#KIPDR0.R0 

*10.R4 

(RO) .R1 

#77416. R1 

3S 

55 



#2.R0 

R4.2$ 

WIPARO.RO 

#10, R4 

(RO).Rl 

#1 77777. Ry 

5S 

55 



023316 062700 000002 



5$: 



ADD 



#2.R0 



TEST APT ENVIRONMENT BIT 

IF CLEAR, NOT ON APT SO DO TEST 

IF ON APT TEST PASS COUNTER 

IF NOT FIRST PASS SKIP TEST 

SET ALL BITS IN ALL PAR'S AND PDR'S 

ISSUE AN "INIT" BY EXECUTING A RESET 

LOAD ADDRESS OF FIRST KERNEL PDR IN RO 

LOAD LOOP COUNTER WITH AN 8 

READ A KERNEL PDR INTO R1 

ARE ALL THE BITS STILL SET? 

BRANCH IF VES 

KERNEL PDR AFFECTED BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000773 

FORM ADDRESS OF NEXT KERNEL PDR 

LOOP TO 2$ UNTIL ALL KERNEL PDR'S CHECKED 

LOAD ADDRESS OF FIRST KERNEL PAR IN RO 

LOAD LOOP COUNTER WITH AN 8 

READ A KERNEL PAR INTO R1 

ARE ALL THE BITS STILL SET? 

BRANCH IF YES 

KERNEL PAR AFFECTED BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 4$" = 000773 

FORM ADDRESS OF NEXT KERNEL PAR 
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T22 TEST THAT PAR-PDR'S NOT AFFECTED BY RESET 



SEO 0043 



2086 

2087 

2088 

2089 

2090 

2091 

2092 

2093 

2094 

2095 

2096 

2097 

2098 

2099 

2100 

2101 

2102 

2103 

2104 

2105 

2106 

2107 

2108 

2109 

2110 

2111 

2112 

2113 

2114 

2115 

2116 

2117 

2118 

2119 

2120 

2121 

2122 

2123 

2124 

2125 

2126 

2127 

2128 

2129 

2130 

2131 

2132 

2133 

2134 

2135 

2136 

2137 

2138 

2139 

2140 

2141 



023322 
023324 
023330 
023334 
023336 
023342 
023344 



023346 
023352 

023354 
023360 
023364 
023366 
023372 
023374 



023376 
023402 
023404 



023406 
023412 
023414 
023420 
023422 
023426 
023430 
023434 
023440 
023444 
025450 
023452 



0774 "1 0 
012700 
012704 
011001 
022701 
001401 
104055 



062700 
077410 

012700 
012704 
011001 
022701 
001401 
104055 



062700 
077410 



023404 000004 



012700 
005001 
012702 
010120 
062701 
077204 
012710 
012700 
012701 
012702 
010120 
077202 



1 77600 
000010 

077416 



000002 



1 77640 
000010 

1 77777 



000002 



172340 

000007 

000200 

177600 
172300 
077406 
000010 



6$: 



7$: 



8$: 



9$: 



10$: 

; **** 

♦TEST 

* 

* 

* 
* 
* 

* 
* 

* 
* 



SOB 
MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



ADD 
SOB 

MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



ADD 

SOB 



R4,4$ 

/ruIPDRO.RO 

#10. R4 

(RO).RI 

#7741 6, Rl 

7$ 

55 



#2,R0 
R4.6$ 

#UIPARO.RO 

#10, R4 

(R0),R1 

#1 77777, Rl 

9$ 

55 



#2,R0 
R4,8$ 



LOOP TO 4$ UNTIL ALL KERNEL PAR'S CHECKED 
LOAD ADDRESS OF FIRST USER PDR IN RO 
LOAD LOOP COUNTER WITH AN 8 
READ A USER PDR INTO Rl 
ARE ALL THE BITS STILL SET? 
BRANCH IF YES 

USER PDR AFFECTED BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 6$" = 000773 

FORM ADDRESS OF NEXT USER PDR 

LOOP TO 6$ UNTIL ALL USER PDR'S CHECKED 

LOAD ADDRESS OF FIRST USER PAR IN RO 
LOAD LOOP COUNTER WITH AN 8 
READ A USER PAR INTO Rl 
ARE ALL THE BITS STILL SET? 
BRANCH IF YES 

USER PAR AFFECTED BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 8$^' = 000773 

FORM ADDRESS OF NEXT USER PAR 

LOOP TO 8$ UNTIL ALL USER PAR'S CHECKED 



*********************************************************** 



23 



RELOCATION t ADDER TEST (NO CARRIES) 



THE FOLLOWING TEST SETS UP THE KERNEL PAR'S AND PDR'S 
FOR THE REST OF THE PROGRAM. IT THEN USES DIFFERENT 
VIRTUAL ADDRESSES AND DIFFERENT VALUES FOR KERNEL PAR 4 
TO PUT DIFFERENT PATTERNS AT THE INPUTS OF THE 
MEMORY MANAGEMENT ADDER. THE VALUES ARE SUCH 
THAT NO CARRIES ARE GENERATED OUT OF THE ADDER. 

THE METHOD USED TO SEE THAT THE RIGHT PHYSICAL BUS ADDRESS 
IS FORMED BY THE ADDER IS TO VWITE A PATTERN TO VIRTUAL 
LOCATION WITH MEMORY MGMT., AND 

THEN READ THAT LOCATION USING THE PHYSICAL ADDRESS THAT SHOULD 
HAVE BEEN FORMED TO SEE IF THE TEST PATTERN GOT THERE. 
22HBIT AND 18-BIT ADDRESSING ARE USED. 



'*«** tr****-*-*** *********** *************************************** 



TST23: SCOPE 



1$: 
2$: 



3$: 



MOV 
CLR 
MOV 
MOV 
ADD 
SOB 
MOV 
MOV 
MOV 
MOV 
MOV 
SOB 



#KIPARO,RO 
Rl 

#7.R2 
R1,(R0)+ 
#200. Rl 
R2.2$ 

#177600. (RO) 
#KIPDRO.RO 
#77406. Rl 
#10. R2 
R1,(R0)+ 
R2.3$ 



LOAD ADDRESS OF FIRST KERNEL PAR IN RO 
CLEAR Rl 

LOAD LOOP COUNTER WITH A 7 

MAP KERNEL PAR'S TO PAGES 0-6 (4K EACH) 

LOOP UNTIL KIPARO - KIPAR6 ARE LOADED 
MAP K I PAR 7 TO THE I/O PAGE 
LOAD ADDRESS OF FIRST KERNEL PDR IN RO 
LOAD PDR DATA INTO Rl 
LOAD LOOP COUNTER WITH AN 8 
MAP ALL 8 PAGES 128 BLOCKS. JPWARD 
EXPANDABLE, READ/WRITE 
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T23 RELOCATION £ ADDER TEST (NO CARRIES) 



SEO 004^ 



2U2 

2K3 

2KA 

2K5 

2K6 

2K7 

2H8 

2K9 

2150 

2151 

2152 

2153 

21 5A 

2155 

2156 

2157 

2158 

2159 

2160 

2161 

2162 

2163 

21 6A 

2165 

2166 

2167 

2168 

2169 

2170 

2171 

2172 

2173 

2174 

2175 

2176 

2177 

2178 

2179 

2180 

2181 

2182 

2183 

2184 

2185 

2186 

2187 

2188 

2189 

2190 

2191 

2192 

2193 

2194 

2195 

2196 

2197 



023454 
023462 
025466 
023472 
025476 
023502 
023506 
023512 
023516 
023524 
023526 
023532 
023534 
023540 

023542 
023544 

023550 
C23554 



012737 
012700 
012701 
012702 
012704 
010437 
0V037 
005037 
052737 
010211 
005037 
011003 
013710 
020203 

001405 
010137 
004737 
104017 



C23454 001110 4$: 
067776 
107776 
125250 
000600 
172350 
001176 
172516 
000001 

177572 

001 1 76 



001306 
035620 



177572 



MOV #4$.$LPERR 

MOV #67776. RO 

MOV #107776, R1 

MOV #125250. R2 

MOV #600. R4 ;LOAD 

MOV R4.KIPAR4 

MOV (RO).$TMPO 

CLR SR3 

BIS #8iT0.SR0 

MOV R2.(R1) 

CLR SRO 

MOV (R0).R3 

MOV $TMPO,(RO) 

CMP R2.R3 

BEO 5$ 

MOV RI.VIRTl 

JSR PC.FORMPA 

ERROR 17 



R4 



023556 








5$: 






023556 


012737 


023556 


001110 


6$: 


MOV 


#6$,$LPERR 


023564 


012700 


067776 






MOV 


#67776. RO 


023570 


012701 


102576 






MOV 


#102576. Rl 


023574 


012702 


125251 






MOV 


#125251 .R2 


023600 


012704 


000652 






MOV 


#652, R4 .-LOAD 


023604 


010437 


172350 






MOV 


R4,KIPAR4 


023610 


011037 


001176 






MOV 


(R0),$TMP0 


023614 


005037 


172516 






CLR 


SR3 


023620 


052737 


000001 


177572 




BIS 


#81 TO, SRO 


023626 


010211 








MOV 


R2,(R1) 


023630 


005037 


177572 






CLR 


SRO 


023634 


011003 








MOV 


(R0).R3 


023636 


013710 


001176 






MOV 


STMPO.CRO) 


023642 


020203 








CMP 


R2,R3 


023644 


001405 








BEO 


7$ 


023646 


01^137 


001306 






MOV 


RI.VIRTl 


023652 


004737 


035620 






JSR 


PC.FORMPA 


023656 


104017 








ERROR 


17 



R4 



023660 7$: 

023660 012737 023660 00111C 8$: MOV #8$.tLPERR 



SET LOOP ON ERROR POINTER TO 4$ 
LOAD PHYSICAL ADDR. P8A INTO RO 
LOAD VIRTUAL ADDR. V8A INTO Rl 
LOAD TEST PATTERN INTO R2 
WITH PAR VALUE 

LOAD KERNEL PAR 4 BITS <15:00> 
SAVE CONTENTS AT TEST LOCATION 
SET UP FOR 18 BIT ADDRESSING 
TURN ON MEM. MGNT. 

LOAD 125250 USING ADDER (PAR4 ♦ VHT ADDR.) 
TURN OFF MEMORY MGMT. 

READ 125250 BACK WITHOUT USING MEM. MGMT. 
RESTORE ORIGINAL CONTENTS TO TEST LOC. 
WAS SAME PATTERN READ BACK THAT WAS 
WRITTEN USING MEMORY MANAGEMENT? 
BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
GO FORM PHYSICAL ADDRESS FOR TYPING 
TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 4$" = 000742 

SET LOOP ON ERROR POINTER TO 6$ 
LOAD PHYSICAL ADDR. P8A INTO RO 
LOAD VIRTUAL ADDR. VBA INTO Rl 
LOAD TEST PATTERN INTO R2 
WITH PAR VALUE 

LOAD KERNEL PAR 4 BITS <15:00> 
SAVE CONTENTS AT TEST LOCATION 
SET UP FOR 18 BIf ADDRESSING 
TURN ON MEM. MGNT. 

LOAD 125251 USING ADDER (PAR4 ♦ VIKT ADDR.) 
TURN OFF MEMORY MGMT. 

READ 125251 BACK WITHOUT USING MEM. MGMT, 
RESTORE ORIGINAL CONTENTS TO TEST LOC. 
WAS SAME PATTERN READ BACK THAT WAS 
WRITTEN USING MEMORY MANAGEMENT? 
BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
GO FORM PHYSICAL ADDRESS FOR TYPING 
TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
;-'BR 6$" = 000742 

;SET LOOP ON ERROR POINTER TO 81 



023666 


012700 


067776 




MOV 


023672 


012701 


105276 




MOV 


023676 


012702 


125252 




nov 


023702 


01270A 


000625 




MOV 


023706 


010437 


172350 




MOV 


023712 


011037 


001176 




MOV 


023716 


052737 


000020 


172516 


BIS 


02372A 


052737 


000001 


177572 


BIS 


023732 


010211 






MOV 


02373A 


005037 


^77572 




CLR 


0237A0 


011003 






MOV 


0237A2 


013710 


001176 




MOV 


0237A6 


020203 






CMP 


023750 


00U05 






BEQ 


023752 


010137 


001306 




MOV 


023756 


004737 


035620 




JSR 


023762 


104017 






ERROR 
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2198 
2199 
2200 
2201 
2202 
2203 
2204 
2205 
2206 
2207 
2208 
2209 
2210 
2211 
2212 
2213 
2214 
2215 
2216 
2217 
2218 
2219 
2220 
2221 
2222 
2221 
222'* 
2225 
222t 
2227 
2228 
2229 
2230 
2231 
2232 
2233 
2234 
2235 
2236 
2237 
2238 
2239 
2240 
2241 
2242 
2243 
2244 
2245 
2246 
2247 
2248 
2249 

2250 024066 012737 

2251 024074 012700 

2252 024100 012701 

2253 024104 012702 



G 4 
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T23 RELOCATION & ADDER TEST (NO CARRIES) 



SEQ U045 



#67776, RO 

#105276. R1 

#125252, R2 

#625, R4 ;L0AD R4 

R4,KIPAR4 

(RO),$TMPO 

#8IT4,SR3 

#8IT0,SR0 

R2,(R1) 

SRO 

(R0).R3 

$TMPO.(RO) 

R2.R3 

9$ 

R1,VIRT1 

PC.fORMPA 

17 



LOAD PHVSICAL ADDR. P8A INTO RO 
LOAD VIRTUA. ADDR. V8A INTO Rl 
LOAD TEST PATTERN INTO R2 
WITH PAR VALUE 

LOAD KERNEL PAR 4 BITS <15:00> 
SAVE CONTENTS AT TEST LOCATION 
SET UP FOR 22 BIT ADDRESSING 
TURN ON MEM. MGNT. 

LOAD 125252 USING ADDER (PAR4 ♦ VIRT ADDR.) 
TURN OFF MEMORY MGMT. 

READ 125252 BACK WITHOUT USING MEM. MGMT. 
RESTORE ORIGINAL CONTENTS TO TEST LOC . 
WAS SAME PATTERN READ BACK THAT WAS 
WRITTEN USING MEMORY MANAGEMENT? 
BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
GO FORM PHYSICAL ADDRESS FOR TYPING 
TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 8$" = 000742 



023764 








9$: 








023764 


012737 


023764 


001110 


10$: 


MOV 


#10$,$LPERR 


■SET LOOP ON ERROR POINTER TO 10$ 


023772 


012700 


177776 






MOV 


#PSW,RO 


■LOAD PHYS. ADDR. OF PSW INTO RO 


023776 


012701 


100076 






MOV 


#1000 76. Rl 


•LOAD VIRTUAL ADDR. FOR PSW INTO Rl 


024002 


012702 


030340 






MOV 


#030340.R2 


;LOAD DATA FOR PSW IN R2 


024006 


012704 


007777 






MOV 


M7777M 


■LOAD R4 WITH PAR VALUE 


024012 


010437 


172350 






MOV 


R4,KIPAR4 


•LOAD KERNEL PAR 4 BITS <11:00> 


024016 


005010 








CLR 


(RO) 


; CLEAR THE PSW 


024020 


005037 


172516 






CLR 


SR3 


;SET UP FOR 18 BIT ADDRESSING 


024024 


052737 


000001 


^ 77572 




BIS 


#8JT0.SR0 


;TURN ON MEnORY MANAGEMENT 


024032 


010211 








MOV 


R2. (Rl ) 


•LOAD PSW USING ADDER (PAR4 * VIRT ADDR.) 


024034 


005037 


177572 






CLR 


SRO 


■TURN OFF MEM. MGMT (SRO=0) 


024040 


011003 








MOV 


(R0),R3 


•READ PSW BACK WITHOUT USING F«M. MGMT. 


024042 


005010 








CLR 


(RO) 


■CLEAR THE PSW 


024044 


042703 


000037 






BIC 


#37,R3 


■MASK TH3IT & CC BITS OUT OF DATA READ 


024050 


020203 








CMP 


R2,R3 


■WAS PSW WRITTEN? 


024052 


001405 








BEQ 


11$ 


;8RANCH IF YES 


024054 


010137 


001306 






MOV 


R1,VIRT1 


•SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 


024060 


004737 


035620 






JSR 


PCFORMPA 


■GO FORM PHYSICAL ADDR. FOR TYPING 


024064 


104017 








ERROR 


17 


;PSW DID NOT HAVE DATA THAT IT SHOULD HAVE 



024066 001110 11$: MOV #11$.$LPERR 

1 77776 MOV #PSW,RO 

117776 MOV #11 7776, Rl 

030240 MOV #030240, R2 



APPARENTLY PHYS. ADDR. OF PSW WAS 
NOT FORMED BY ADDERS USING THE 
VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'SR 10$" = 000742 
SET LOOP ON ERROR POINTER TO 11$ 
LOAD PHYS. ADDR. OF PSW INTO RO 
LOAD VIRTUAL ADDR. FOR PSW INTO Rl 
LOAD DATA FOR PSW IN R2 
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T23 RELOCATION ft ADDER TEST (NO CARRIES) 



SEC 0046 



2254 

2255 

2256 

2257 

2258 

2259 

2260 

2261 

2262 

2263 

2264 

2265 

2266 

2267 

2268 

2269 

2270 

2271 

2271 

2271 

227^ 

2275 

2276 

2277 

227B 

2279 

2280 

2281 

2282 

2283 

2284 

2285 

2286 

2287 

2288 

2289 

2290 

2291 

2292 

2293 

2294 

2295 

2296 

2297 

2298 

2299 

2300 

2301 

2302 

2303 

2304 

2305 

2306 

2307 

2308 

2309 



024110 
024114 
024120 
024126 
024134 
024136 
024142 
024144 
024146 
024152 
024154 
024156 
024162 
024166 



024176 

024200 

024200 
024206 
024212 
024216 
024222 
024226 
024232 
024236 
024244 
024252 
024254 
024260 
024262 
024266 

024270 
024272 
024276 



012704 
010437 
052737 
052737 
010211 
005037 
011003 
005010 
042703 
020203 
001405 
010137 
004737 
104017 



1 77600 
1 72350 
000020 
000001 

177572 



000037 



001306 
035620 



172516 
177572 



MOV 
MOV 
BIS 
BIS 
MOV 
CLR 
MOV 
CLR 
BIC 
CMP 
BEQ 
MOV 
JSR 
ERROR 



#1 77600. R4 

R4.KIPAR4 

*eiT4,SR3 

«8IT0,SR0 

R2.(R1) 

SRO 

(R0).R3 

(RO) 

*37,R3 

R2.R3 

12$ 

R1,VIRT1 

PC.FORMPA 

17 



024170 012737 023406 001110 12$: 



MOV 



AH$.$LPERR 



LOAD R4 WITH PAR VALUE 

LOAD KERNEL PAR 4 BITS <15:00> 

SET UP FOR 22 BIT ADDRESSING 

TURN ON MEMORY MANAGEMENT 

LOAD PSU USING ADDER (PAR4 * VIRT. ADDR.) 

TURN OFF MEM. MGMT (SRO=0) 

READ PSW BACK WITHOUT USING MEM. MGMT. 

CLEAR THE PSW 

MASK T-8IT t CC BITS OUT OF DATA READ 
WAS PSW WRITTEN? 
BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYSICAL ADDR. 

GO FORM PHYSICAL ADDR. ^OR TYPING 

PSW DID NOT HAVE DATA THAT IT SHOULD 

HAVE, APPARENTLY PHYS. ADDR. OF PSW WAS 

NOT FORMED BY ADDERS USING THE 

VIRTUAL ADDR. AND KIPAR4 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 11$" = 000743 

RESET LOOP ON ERROR POINTER TO 1$ 



000004 



012737 
012700 
012701 
012702 
012704 
010437 
011037 
052737 
052737 
010211 
005037 
011003 
013710 
020203 

001405 
010137 
004737 



West 24 
* 



RELOCATION & ADDER TEST (WITH CARRIES) 



* THE FOLLOWING TEST USES THE SAME METHOD AS THE PREVIOUS 

* TEST TO VERIFY MEMORY MANAGEMENTS ABILITY TO CWSTRUCT 

* PHYSICAL BUS ADDRESSES USING A VIRTUAL BUS ADDRESS AND THE 

* CONTENTS OF A PAGE ADDRESS REGISTER. HOWEVER. THE VALUES 

* AND PATTERNS USED IN THIS TEST WILL GENERATE CARRIES 

* AND CHECK ' VJRAPAROUND" TO ADDRESS 000000 BY 

* USING VIRTUAL ADDR. 111400 AND KIPAR4 = 177664. 

* 22H3IT ADDRESSING IS USED. 



TST24: SCOPE 



024200 
066476 
114376 
125253 
000521 
1 72350 
001176 
000020 
000001 

177572 

001 1 76 



001306 
035620 



1$: 

001110 2$: 



172516 
177572 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
BIS 
BIS 
MOV 
CLR 
MOV 
MOV 
CMP 

BEQ 
MOV 

JSR 



*2$.$LPERR 

#66476.R0 

<rl 14376. R1 

#125253. R2 

*521.R4 ;LOAD 

R4,KIPAR4 

(RO).$TMPO 

#8IT4,SR3 

«8IT0,SR0 

R2.(R1) 

SRO 

(R0).R3 

$TMPO.(RO) 

R2.R3 

3$ 

RI.VIRTI 
PC.FORMPA 



; KERNEL PAR'S AND PDR'S HAVE BEEN 
SET UP BY THE PREVIOUS TEST 
;SET LOOP ON ERROR POINTER TO 2$ 
:LOAD PHYSICAL ADDR. PBA INTO RO 
;LOAD VIRTUAL ADDR. V8A INTO R1 
;LOAD TEST PATTERN INTO R2 
R4 WITH PAR VALUE 

;LOAD KERNEL PAR 4 BITS <15:00> 
SAVE CONTENTS AT TEST LOCATION 
SET UP FOR 22 BIT ADDRESSING 
TURN ON MEM. MGNT. 

;LOAD 125253 USING ADDER (PAR4 ♦ VIRT ADDR.) 
■TURN OFF MEMORY MGMT. 

;READ 125253 BACK WITHOUT USING MEM. MGMT. 
;RESTORE ORIGINAL CONTENTS TO TEST LOC. 
;WAS SAME PATTERN READ BACK THAT WAS 
; WRITTEN USING MEMORY MANAGEMENT? 
r BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
;60 FORM PHYSICAL ADDRESS FOR TYPING 
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T24 RELOCATION & ADDER TEST (WITH CARRIES; 



bEO 0047 



?310 

2311 

2312 

2313 

2314 

2315 

2316 

2317 

2318 

2319 

2320 

2321 

2322 

2323 

2324 

2325 

2326 

2327 

2328 

2329 

2330 

2331 

2332 

2333 

2334 

2335 

2336 

2337 

2338 

2339 

2340 

2341 

2342 

2343 

2344 

2345 

2346 

2347 

2348 

2349 

2350 

2351 

2352 

2353 

2354 

2355 

2356 

2357 

2358 

2359 

2360 

2361 

2362 

2363 

2364 

2365 



024302 104017 



ERROR 1 7 



024304 








3S: 






024304 


012737 


024304 


001110 


4S: 


MOV 


*4j»^$LPERR 


024312 


012700 


062276 






MOV 


#62276. RO 


024316 


012701 


107376 






MOV 


#107376. R1 


024322 


012702 


125254 






MOV 


#125254. R2 


024326 


012704 


000527 






MOV 


#527. R4 .LOAD 


024332 


010437 


172350 






MOV 


R4.KIPAR4 


024336 


011037 


001 1 76 






MOV 


(RO).$TMPO 


024342 


052737 


000020 


172516 




BIS 


#8IT4.SR3 


024350 


052737 


000001 


177572 




BIS 


#8IT0.SR0 


024356 


010211 








MOV 


R2.(R1) 


C24360 


005037 


177572 






CLR 


SRO 


024364 


011003 








MOV 


(R0),R3 


024366 


013710 


001176 






MOV 


$TMPO, (RO) 


024372 


020203 








CMP 


R2.R3 


024374 


001405 








BEO 


5$ 


024376 


010137 


001 306 






MOV 


R1,VIRT1 


024402 


004737 


035620 






JSR 


PC.FORMPA 


024406 


104017 








ERROR 


17 



024410 








5%: 




#6$,$LPERR 


024410 


012737 


024410 


001110 


6S: 


MOV 


024416 


012700 


062076 






MOV 


#62076, RO 


024422 


012701 


104576 






MOV 


#104576,R1 


024426 


012702 


125255 






MOV 


#125255, R2 


024432 


012704 


000553 






MOV 


#553. R4 ;LOAD 


024436 


010437 


1 72350 






MOV 


R4,KIPAR4 


024442 


011037 


001176 






MOV 


(R0).$TMP0 


024446 


052737 


000020 


172516 




BIS 


#8IT4,SR3 


024454 


052737 


000001 


1 77572 




BIS 


#81 TO, SRO 


024462 


010211 








MOV 


R2.(R1) 


024464 


005037 


177572 






CLR 


SRO 


024470 


011003 








MOV 


(R0),R3 


024472 


013710 


001176 






MOV 


$TMPO,(RO) 


024476 


020203 








CMP 


R2,R3 


024500 


001405 








BEO 


7$ 


024502 


010137 


001306 






MOV 


R1,VIRT1 


024506 


004737 


035620 






JSR 


PC.FORMPA 


024512 


104017 








ERROR 


17 



.■TEST LOCATION DID NOT HAVE PATTERN 
.THAT SHOULD HAVE BEEN WRITTEN TO IT. 
.•APPARENTLY PHYSICAL ADDR. WAS 
.•FORMED WRONG BY ADDERS USING 
;THE VIRTUAL ADDR. AND KIPAR4 
;FOR TIGHTER SCOPE LOOP 
.•REPLACE ERROR CALL WITH 
;'BR 2$" = 000742 

.-SET LOOP ON ERROR POINTER TO 4$ 
.•LOAD PHYSICAI ADDR. PBA INTO RO 
.■LOAD VIRTUAL ADDR. VBA INTO R1 
;LOAD TEST PATTERN INTO R2 
R4 WITH PAR VALUE 

;LOAD KERNEL PAR 4 BITS <15:00> 
;SAVE CONTENTS AT TEST LOCATION 
;SET UP FOR 22 BIT ADDRESSING 
;TURN ON MEM. MGNT. 

.•LOAD 125254 USING ADDER (PAR4 ♦ VIRT ADDR.) 
;TURN OFF MEMORY MGMT. 

.-READ 125254 BACK WITHOUT USING MEM. MGMT. 
.•RESTORE ORIGINAL CONTENTS TO TEST LOC. 
.-WAS SAME PATTERN READ BACK THAT WAS 
.•WRITTEN USING MEMORY MANAGEMENT? 
.•BRANCH IF YES 

;SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
;G0 FORM PHYSICAL ADDRESS FOR TYPING 
.•TEST LOCATION DID NOT HAVE PATTERN 
;THAT SHOULD HAVE BEEN WRITTEN TO IT. 
.-APPARENTLY PHYSICAL ADDR. WAS 
.-FORMED WRONG BY ADDERS USING 
.•THE VIRTUAL ADDR. AND KIPAfi4 
;FOR TIGHTER SCOPE LOOP 
.•REPLACE ERROR CALL WITH 
.••BR 4$" = 000742 

:SET LOOP ON ERROR POINTER TO 6S 
.-LOAD PHYSICAL ADDR. PBA INTO RO 
.■LOAD VIRTUAL ADDR. VBA INTO R1 
."LOAD TEST PATTERN INTO R2 
R4 WITH PAR VALUE 

.•LOAD KERNEL PAR 4 BITS <15:00> 
.•SAVE CONTENTS AT TEST LOCATION 
.SET UP FOR 22 BIT ADDRESSING 
.•TURN ON MEM. MGNT. 

.•LOAD 125255 USING ADDER (PAR4 ♦ VIRT ADDR.) 
;TURN OFF MEMORY MGMT. 

;READ 125255 BACK WITHOUT USING MEM. MGMT. 
.•RESTORE ORIGINAL CONTENTS TO TEST LOC. 
:WAS SAME PATTERN READ BACK THAT WAS 
.•WRITTEN USING MEMORY MANAGEMENT? 
.•BRANCH IF YES 

.•SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
;G0 FORM PHYSICAL ADDRESS FOR TYPING 
.•TEST LOCATION DID NOT HAVE PATTERN 
;THAT SHOULD HAVE BEEN WRITTEN TO IT . 
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r24 RELOCATION ft ADDER TEST (WITH CARRIES) 



SEO 0048 



2366 






2367 






2368 






2369 






2370 






2371 






2372 


024514 




2373 


024514 


012737 


2374 


024522 


012700 


2375 


024526 


012701 


2376 


024532 


012702 


2377 


024536 


012704 


2378 


024542 


010437 


2379 


024546 


011037 


2380 


024552 


052737 


2381 


024560 


052737 


2382 


024566 


010211 


2383 


024570 


005037 


2384 


024574 


011003 


2385 


024576 


013710 


2386 


024602 


020203 


2387 






2388 


024604 


001405 


2389 


024606 


010137 


2390 


024612 


004737 


2391 


024616 


104017 


2392 






2393 






2394 






2395 






2396 






2397 






2398 






2399 


024620 




2400 


024620 


012737 


2401 






2402 






2403 






2404 






2405 






2406 






2407 






2408 






2409 






2410 






2411 






2412 






2413 






2414 






2415 






2416 






2417 






2418 






2419 






2420 






2421 







024514 
000000 
111400 
125256 
1 77664 
172350 
001176 
000020 
000001 

177572 

001 176 



001306 
035620 



001110 



7%: 
8$: 



172516 
177572 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
BIS 
BIS 
MOV 
CLR 
MOV 
MOV 
CMP 

BEO 
MOV 
JSR 
ERROR 



m,$LPERR 

ffOOOOO.RO 

*1 lUOO.RI 

*125256.R2 

*1 77664, R4 

R4,KIPAR4 

(RO).$TMPO 

*8IT4.SR3 

#8IT0,SR0 

R2,(R1) 

SRO 

(RO) ,R3 

$TMPO,(RO) 

R2.R3 

9$ 

RI.VIRTI 
PCFORMPA 

17 



024200 001110 



9$: 



MOV 



#1$,$LPERR 



APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 6$" = 000742 

SET LOOP ON ERROR POINTER TO 8$ 
LOAD PHYSICAL ADDR. PRA INTO RO 
LOAD VIRTUAL ADDR. VBA INTO R1 
LOAD TEST PATTERN INTO R2 
LOAD R4 WITH PAR VALUE 
LOAD KERNEL PAR 4 BITS <15:00> 
SAVE CONTENTS AT TEST LOCATION 
SET UP FOR 22 BIT ADDRESSING 
TURN ON MEM. MGNT. 

LOAD 125256 USING ADDER (PAR4 + VIRT ADDR.) 
TURN OFF MEMORY MGMT. 

READ 125256 BACK WITHOUT USING MEM. MGMT. 
RESTORE ORIGINAL CONTENTS TO TEST LOC. 
WAS SAME PATTERN READ BACK THAT WAS 
WRITTEN USING MEMORY MANAGEMENT? 
BRANCH IF YES 

SAVE VIRTUAL ADDR. TO FORM PHYS. ADDR 
GO FORM PHYSICAL ADDRESS FOR TYPING 
TEST LOCATION DID NOT HAVE PATTERN 
THAT SHOULD HAVE BEEN WRITTEN TO IT. 
APPARENTLY PHYSICAL ADDR. WAS 
FORMED WRONG BY ADDERS USING 
THE VIRTUAL ADDR. AND KIPAR4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 8$" = 000742 

RESET LOOP ON ERROR POINTER TO 1$ 



•TEST 25 READ AND WRITE WHILE IN RELOCATE MODE 



THE FOLLOWING TEST TURNS ON MEMORY MANAGEMENT AND THEN 
READS AND WRITES LOCATIONS BETWEEN PHYSICAL ADDRESSES 
060000-067600. ONE LOCATION IN EVERY BLOCK (32. WORDS) 
IS WRITTEN USING PAR4 AND READ USING PARS. THIS IS 
DONE IN BOTH USER AND KERNEL MODES. THE USER PAR/PDR'S 
ARE SET UP AT THE BEGINNING OF THE TEST AND ONCE MEMORY 
MANAGEMENT IS TURNED ON IT IS LEFT ON FOR THE REST OF THE 
OF THE PROGRAM. THE 'WODE" INPUT TO THE PAR/PDR ADDRESS MUX 
IS CHECKED BY READING AND WRITING IN USER MODE. REMEMBER 
ALSO, THAT SINCE MEMORY MANAGEMENT IS ON (IN RELOCATE 
MODE) THE PROGRAM ITSELF IS USING ITS VIRTUAL ADDRESSES AND 
PAR/PDR'S 0-3 TO EXECUTE. PAR7/PDR7 ARE USED TO ACCESS THE 
I/O PAGE. 

WHILE TESTING IN KERNEL MODE, USER PAGES 4 6 5 ARE MAPPED 
NON-RESIDENT WITH DIFFERENT PAR VALUES THAN THE KERNEL 
PAR'S TO BE SURE THAT THE KERNEL PAR'S AND PDR'S ARE BEING 
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7U77 








?^?\ 
















?<i?5 


















































024626 


000004 




2432 








2433 


024630 


005037 


177776 


2434 


024634 


01 2704 


000577 


2435 


024640 


012705 
010437 
010537 


000600 

www 


2436 


024644 


172350 


2437 


024650 


172352 


2438 


024654 


012700 


177640 


2439 


024660 


005001 




2440 


024662 


012702 


000007 

WWW f 


2441 


C24666 


010120 




2442 


024670 


062701 


000200 


2443 


024674 


077204 




2444 


024676 


012710 


1 77600 


2445 


024702 


012700 


1 77600 


2446 


024706 


012701 


077406 


2447 


024712 


012702 


000010 


2448 


024716 


010120 




2449 


024720 


077202 




2450 


024722 


012737 


025010 


2451 


024730 


012737 


025274 


2452 


024736 


052737 


000020 

W Wfc w 


2453 


024744 


012737 


000001 

www 1 


2454 


024752 


105037 


177610 


2455 


024756 


105037 


177612 


2456 


024762 


010537 


177650 


2457 


024766 


010437 


1 77652 


2458 


024772 


013737 


1 7777t 


2459 


025000 


012700 


100100 

> W 1 w 


2460 


025004 


012701 


1 20000 

I b w w 


2461 


025010 


010010 




2462 


025C12 


011102 




2463 


025014 


020002 




2464 


025016 


001411 




2465 


025020 


010137 


001310 


2466 


025024 


010037 


001306 


2467 


025030 


004737 


035620 


2468 


025034 


1 04020 




2469 








2470 








2471 








2472 








2473 








2474 


025036 


013700 


001306 


2475 


025042 


062700 


000100 


2476 


025046 


062701 


000100 


2477 


025052 


020127 


127700 
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T25 READ AND URJTE WHILE IN RELOCATE MODE 

USED WHEN IN KERNEL MODE (AND VICE VERSA WHILE TESTING IN 
USER MODE). IF A MEM. MGMT. TRAP OCCURS. THE PROGRAM GOES 
TO 9$ WHERE THE TRAP IS REPORTED. 



SEO 0049 



BY SETTING THE LOCATION SMADRI IN THE E-TA8LE TO A CONSTANT. 
AS DESCRIBED IN THE DOCUMENTATION. THIS TEST WILL CONTINUE 
ACCESSING LOCATIONS THROUGHOUT MEMORY BY INCREASING THE VALUE 
OF PAR4 AND PAR5. 
'***************•**»*********•••*•**•*******»»••**************** 



TST25: SCOPE 



1$: 



2$: 



001110 
000250 
172516 
177572 



3$: 



10$: 



001176 4$: 
5$: 



6$: 



MOV 
ADD 
ADD 
CMP 



CLR 


PSW 


START IN KERNEL MODE 


MOV 


tf577,R4 


LOAD R4 WITH VALUE FOR PAR4 


MOV 


tf600.R5 


LOAD R5 WITH VALUE FOR PARS 


MOV 


R4.KIPAR4 


LOAD KERNEL PAR4 


MOV 


R5.KIPAR5 


LOAD KERNEL PARS 


MOV 


*UIPAR0.R0 


LOAD ADDRESS OF FIRST USER PAR IN RO 


CLR 


R1 


CLEAR R1 


MOV 


*7,R2 


■LOAD LOOP COUNTER WITH A 7 
MAP USER PAR'S TO PAGES 0-6 (4K EACH) 


MOV 


R1,(R0)* 


ADD 


*200.R1 




SOB 


R2.2$ 


•LOOP UNTIL UIPAR0-UIPAR6 ARE LOADED 


MOV 


*1 77600. (RO) 


■MAP USER PAR7 TO THE I/O PAGE 


MOV 


*UIPDRO,RO 


•LOAD ADDRESS OF FIRST USER PDR IN RO 


MOV 


*77406.R1 


;LOAD PDR DATA INTO R1 


MOV 


*10.R2 


•LOAD LOOP COUNTER WITH AN 8 


MOV 


Rl.(RO)* 


rMAP ALL 8 PAGES 128 BLOCKS, UPWARD 


SOB 


R2.3$ 


; EXPANDABLE. READ/WRITE 


MOV 


*5$,$LPERR 


rSET LOOP ON ERROR POINTER TO 5$ 


MOV 


*9$.MMVEC 


;SET M. M. TRAP VECTOR TO 9$ 


BIS 


#BIT4.SR3 


;SET UP FOR 22 BIT ADDRESSING 


MOV 


/»8IT0,SR0 


;TURN ON MEMORY MANAGEMENT 


CLRB 


UIPDR4 


;MAP USER SPACE NON-RESIDENT WHILE 


CLRB 


UIPDR5 


; TESTING KERNEL SPACE 

;MAP USER PAR'S OPPOSITE OF K I PAR'S 


MOV 


R5,UIPAR4 


MOV 


R4.UIPAR5 




MOV 


PSW.STMPO 


;SAVE PSW IN CASE OF ERROR 


MOV 


/(flOOIOO.RO 


;PUT VIRTUAL ADDR. THAT USES PAR4 IN RO 


MOV 


#1 20000, Rl 


;PUT VIRTUAL ADDR. THAT USES PARS IN Rl 


MOV 


RO.(RO) 


r WRITE TO TEST LOC. USING PAR4 


MOV 


(R1 >,R2 


jREAD THE SAME LOC, BUT USING PARS 
;DID WE READ WHAT WE WROTE? 


CMP 


R0,R2 


BEQ 


6S 


; BRANCH IF YES 


MOV 


R1.VIRT2 


•SAVE VIRTUAL ADDR. THAT SELECTED PARS 


MOV 


R0,VIRT1 


•SAVE VIRTUAL ADDR. THAT SELECTED PAR4 


JSR 


PCFORMPA 


;G0 FORM PHYSICAL ADDRESS BEING USED 


ERROR 


20 


;READING IOC. USiNG PARS AND A VIRT. 



VIRT1,R0 
*100,R0 
*100,R1 
Rl.<rl 27700 



ADDR. DID NOT FIND DATA WRITTEN WHEN USING 
PAR4 AND VIRT. ADDRESS. 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•T3R 5S" = 000765 
RESTORE VBA IN RO 

CHANGE VIRTUAL ADDRS. TQ POINT TO NEXT BLOCK 
.'WERE BLOCKS FROM 60000-67600 ALL TRIED? 
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125 READ AND WRITE WHILE IN RELOCATE MODE 



SEO 0050 



2A79 

2480 

2481 

2482 

2483 

2484 

2485 

2486 

2487 

2488 

2489 

2490 

2491 

2492 

2493 

2494 

2495 

2496 

249/ 

2498 

2499 

2500 

2501 

2502 

2503 

2504 

2505 

2506 

2507 

2508 

2509 

2510 

2511 

2512 

2513 

2514 

2515 

2516 

2517 

2518 

2519 

2520 

2521 

2522 

2523 

2524 

2525 

2526 

2527 

2528 

2529 

2530 

2531 

2532 

2533 



025056 
025060 
025066 
025070 
025074 
025100 
025106 
025114 
025120 
0251 2«. 
025130 
025134 
025142 
025U4 

025150 
025154 
025156 
025162 
0251 66 
025172 
025176 
025204 
025212 

025216 
025224 
025232 
025236 
025242 
025246 
025252 
025256 
025264 
025272 

025274 
025300 



C25304 
025310 
025314 
025322 
025330 
025336 



001354 
032737 
001026 
010437 
010537 
112737 
112737 
105037 
105037 
010537 
010437 
012737 
000713 
005037 

020537 

002020 
062704 
062705 
010437 
010537 
112737 
112737 
000137 

01273? 
012737 
012705 
010537 
010537 
010537 
010537 
012737 
012737 
000427 

012637 
012637 



010037 
004737 
013737 
013737 
042737 
104052 



140000 177776 



025340 013746 
025344 013746 
025350 000002 



1 77650 
1 77652 
000006 
000006 
172310 
172312 
172350 
172352 
140000 

177776 

001260 

001000 
001000 
172350 
1 72352 
000006 
000006 
024752 

077406 
077406 
000600 
172350 
172352 
177650 
1 77652 
002150 
024630 



001266 
001270 



001306 
035620 
177572 
177576 
160000 



001270 
001266 



177610 
177612 



177776 



7$: 



172310 
172312 



172310 8$: 
172312 



000250 
001110 



9$: 



001272 
001274 
177572 



BNE 5S 

BIT #1 40000, PSW 

BNE 7S 

MOV R4.UIPAR4 

MOV R5.UIPAR5 

M0V8 *6.UIPDR4 

M0V8 *6.UIPDR5 

CLR8 KJPDR4 

CLR8 KIPDR5 

MOV R5.KIPAR4 

MOV R4,KIPAR5 

MOV *1 40000. PSW 

BR 4S 

CLR PSW 

CMP RS,a/ySMADRl 

BGE 8$ 

ADD #1000,R4 

ADD <flOOO,R5 

MOV R4,KIPAR4 

MOV R5.KIPAR5 

M0V8 *6.KIPDR4 

MOVB *6.KIPDR5 

JMP 10$ 

MOV *77406.KIPDR4 

MOV *77406.KIPDR5 

MOV *600,R5 

MOV R5,KIPAR4 

MOV R5.KIPAR5 

MOV R5.UIPAR4 

MOV R5.UIPAR5 

MOV W16MERR.MMVEC 

MOV *1$,$LPERR 

BR TST26 

MOV (KSP)+,TRAPPC 

MOV {KSP)*.TRAPPS 



MOV R0.VIRT1 

JSR PC.FORMPA 

MOV SRO.WASSRO 

MOV SR2,WASSR2 

BIC /»! 60000. SRO 

ERROR 52 



MOV TRAPPS.-{KSP) 
MOV TRAPPC.-(KSP) 
RTI 



BRANCH IF NO 

HAVE WE DONE TEST IN USER MODE VET? 
BRANCH IF YES 
LOAD USER PAR4 
LOAD USER PAR5 

MAP USER SPACE P/W TO TEST IT 

MAP KERNEL SPACE NON-RESIDENT WHILE 

TESTING USER SPACE 
MAP KERNEL PAR'S OPPOSITE UI PAR'S 

GO TO USER MODE 

GO BACK AND READ/WRITE IN USER MODE 
GO BACK TO KERNEL MODE BEFORE LEAVING 

HAVE WE CHECKED ALL MEMORY? 
BRANCH IF YES 

LOAD WITH NEXT VALUE FOR PAR4 
LOAD WITH NEXT VALUE FOR PAR5 
LOAD KERNAL PAR4 
LOAD KERNAL PAR5 

MAP KERNAL SPACE R/W WHILE TESTING 
.•CONTINUE TEST 

;REMAP KERNEL PAGES READ/WRITE 



;MAP KERNEL AND USER PAR'S 4 i 5 
; BACK TO 12-16K 



RESTORE ADDR. OF NORMAL M.M. TRAP ROUTINE 
RESET LOOP ON ERROR POINTER TO 1$ 
;G0 TO NEXT TEST 

.•SAVE PC t PS OF TRAP 

PROGRAM WILL TRAP TO HERE IF TRY 
TO USE USER PDR'S WHEN IN KERNEL MODE 
OR KERNEL PDR'S WHEN IN USER MODE 
SAVE VIRTUAL ADDRESS FOR ERROR REPORT 
GO FORM THE PHYSICAL ADDRESS BEING USED 
SAVE SRO I SR2 FOR ERROR REPORT 

CLEAR ERROR BITS IN SRO 

M.M. TRAP WHILE IN RELOCATE MODE - 

REFERENCED WRONG SET OF PDR'S 

FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
A "MOP" = 000240 
PUT PC i PS OF TRAP ON STACK 

.•RETURN TO TEST 
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2554 
2535 
2536 
2537 
2538 
2539 
2S^0 
2541 
2542 
2543 
2544 
2545 
2546 
2547 
2548 
2549 

2550 025352 000004 

2551 025354 012737 

2552 025362 004737 

2553 025366 012702 

2554 025372 012700 

2555 025376 012701 

2556 025402 010120 

2557 025404 077202 

2558 025406 012705 

2559 025412 012704 

2560 025416 012703 

2561 025422 012737 

2562 025430 012700 

2563 025434 012702 

2564 025440 012701 

2565 025444 010120 

2566 025446 077202 

2567 025450 011313 

2568 025452 031527 

2569 025456 001002 

2570 025460 104021 
2571 

2572 
2573 

2574 025462 000422 

2575 C25464 01 2702 

2576 025470 012^00 

2577 025474 031027 

2578 025500 001403 

2579 025502 020500 

2580 025504 001401 

2581 025506 104022 
2582 

2583 
2584 

2585 025510 062700 

2586 025514 077211 

2587 025516 010115 

2588 025520 031527 

2589 025524 001401 
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TEST. KERNEL PDR'S 



SEO 0051 



000100 



•TEST 
* 
* 
* 

* 
* 
* 
* 



26 



W-eiT LOGIC TEST, KERNEL PDR'S 



THIS TEST WRITES TO EIGHT (8) DIFFERENT VIRTUAL ADDRESSES 

(VBA'S = 17776. 37776. 57776. 77776. 117776J37776, 157776, £ 177776 

& PSA'S CONSTRUCTED = 17776.37776.57776.77776.77776, 

77776.77776. & 777776 RESPECTIVELY). 

WHICH SHOULD CAUSE THE '\J-8IT" TO SET IN EACH OF THE 

EIGHT (8) KERNEL PAGE DESCRIPTOR REGISTERS. THE PDR'S 

ARE CHECKED TO SEE THAT IT'S W-BIT DOES SET WHEN THE 

PAGE IT IS MAPPED TO IS WRITTEN TO AND THAT THE W-BIT 

DOES NOT SET IN ANY OF THE OTHER PDR'S. KERNEL PDR'S 3.4,5.6 

ARE IWPED TO 12-16K FOR THIS TEST. ALSO THE W-BIT 

SHOULD BE CLEARED WHEN THE PDR IS WRITTEN TO. THE 

W-eiT PORTION OF THE PDR'S IS BEING CHECKED. 



000340 1 77776 

035246 

000004 

172346 

000600 



172300 
000010 
017776 

025430 001110 
172300 
000010 
077406 



TST26: 
1$: 



2$: 

3S: 
4S: 



000010 
1 72300 
000100 



5$: 
6S: 



000002 
000100 



71: 



SCOPE 

MOV 

JSR 

MOV 

MOV 

MOV 

MOV 

SOB 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

SOB 

MOV 

BIT 

BNE 

ERROR 



BR 

MOV 

MOV 

BIT 

BEO 

CMP 

BEQ 

ERROR 



ADD 
SOB 
MOV 
BIT 
BEQ 



*340.PSW 
PC. TOFF 
*4.R2 

*KIPAR3,R0 

*600.R1 

R1,(R0)+ 

R2,2$ 

*KIPDR0,R5 

*10,R4 

*17776,R3 

/)r3S,SLPERR 

/)rKIPDR0,R0 

*10,R2 

Xf77406,Rl 

R1,(R0)* 

R2.4$ 

(R3),(R3) 

(R5),*WBIT 

5$ 

21 



8S 

*10,R2 
ArKIPDR0,R0 
(R0),/lfWBIT 
7$ 

R5,R0 
7$ 

22 



#2.R0 

R2.6$ 

R1.(R5) 

(R5).*WBIT 

8$ 



.•LOCK OUT ALL POSSIBLE INTERRUPTS 
TURN T-6IT TRAPPING OFF FOR THIS TEST 
SET LOOP COUNTER TO 4 
LOAD ADDRESS OF PAR3 INTO RO 
LOAD '•12-16K" PAR VALUE INTO R1 
MAP PARS 3-6 TO 12-16K 
LOOP TIL ALL 4 OF THEM LOADED 
LOAD ADDRESS OF FIRST PDR TO BE TESTED IN R5 
SET LOOP COUNTER TO 8 
INITIALIZE VIRTUAL ADDRESS TO BE IN R3 
SET LOOP ON ERROR POINTER TO 3S 
LOAD ADDR. OF FIRST PDR TO BE SETUP IN RO 
SET LOOP COUNTER TO 8 
PUT "Irf-BIT OFF DATA" INTO R1 
CLEAR ALL W-BITS BY WRITING TO ALL PDRS 
LOOP UNTIL ALL OF THEM SETUP 
DO 'DATO" TO VIRTUAL ADDR. -SETTING A WH3IT 
DID THAT CAUSE W-BIT TO BE SET? 
BRANCH IF YES 

W-BIT DID NOT GET SET IN PDR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 3$" = 000763 

SKIP CHECKING OTHER PDR'S-ERROR WILL SET W-BITS 
SET LOOP COUNTER TO 8 

LOAD ADDR. OF FIRST PDR TO BE CHECKED IN RO 
DID WH3IT IN OTHER PDRS REMAIN CLEAR? 
BRANCH IF YES 

IF W-BIT SET. TMEN WAS IT PDR UNDER TEST? 
BRANCH IF YES 

W-BIT GOT SET IN MORE THAN ONE PDR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 3$" = 000750 

POINT RO TO NEXT PDR TO BE CHECKED 
LOOP UNTIL ALL 8 CHECKED ^CR CLEAR W-BIT 
WRITE TO THE PDR TESTED TO CLEAR W-BIT 
DID WRITING PDR CLEAR THE W-8I T.- 
BRANCH IF YES 
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2590 

2591 

2592 

2593 

259A 

2595 

2596 

2597 

2598 

2599 

2600 

2601 

2602 

2603 

260A 

2605 

2606 

2607 

2608 

2609 

2610 

2611 

2612 

2613 

26U 

2615 

2616 

2617 

2618 

2619 

2620 

2621 

2622 

2623 

262A 

2625 

2626 

2627 

2628 

2629 

2630 

2631 

2632 

2633 

263A 

2635 

2636 

2637 

2638 

2639 

26A0 

26A1 

26A2 

26A3 

26A4 

26^5 



025526 104023 



WACYll 30A(1052) K-JAN-81 
;05 T26 W-8IT LOGIC 

ERROR 23 



N 4 
11:36 PAGE 
TEST. KERNEL 



025530 062705 000002 

02553A 062703 020000 

025540 077445 

025542 012737 025354 001110 

025550 004737 035302 



8$: 



ADD 
ADD 
SOB 
MOV 
JSR 



*2.R5 

*20000.R3 

R4.3$ 

*1$.$LPERR 
PC. TON 



52 

PDR'S 

U-8IT DID NOT CLEAR BY WRITING THE PDR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 3$" = 000740 

POINT R5 TO THE NEXT PDR TO BE TESTED 
CHANGE VIRT. ADDR TO REF. NEXT PDR 
LOOP BACK TO 3$ UNTIL ALL 8 PDR'S TESTED 
RESET LOOP ON ERROR POINTER TO 1$ 
TURN T-8IT BACK ON FOR NEXT TEST 



SEO 0052 



025554 


000004 






tsT27: 


SCOPE 


#1 40000, PSU 


025556 


012737 


140000 


177776 


1$: 


MOV 


025564 


004737 


035246 






JSR 


PC. TOFF 


025570 


012702 


000004 






MOV 


*4.R2 


025574 


012700 


1 77646 






MOV 


/nJIPAR3.R0 


0256''0 


012701 


000600 






MOV 


#600. R1 


025604 


010120 






2$: 


MOV 


R1,(R0)+ 
R2.2$ 


025606 


077202 








SOB 


025610 


012705 


1 77600 






MOV 


#UIPDR0.R5 


025614 


012704 


000010 






MOV 


#10. R4 


025620 


012703 


017776 






MOV 


#17776,R3 


025624 


012737 


025632 


001110 




MOV 


#3$.$LPERR 


025632 


012700 


1 77600 




3$: 


MOV 


/nJiPDRO.RO 


025636 


012702 


000010 






MOV 


#10.R2 


025642 


012701 


077406 






MOV 


#77406, Rl 


025646 


010120 






4S: 


MOV 


R1.(R0)+ 


025650 


077202 








SOB 


R2.4$ 
{R3).(R3) 


025652 


011313 








MOV 


025654 


031527 


000100 






BIT 


(R5}.#UBIT 


025660 


001002 








BNE 


5$ 


025662 


104021 








ERROR 


21 



025664 
025666 
025672 
025676 
025702 
025704 



000422 
012702 
012700 
031027 
001403 
020500 



000010 
177600 
000100 



**************************************************************** 
'•TEST 27 UH3IT LOGIC TEST. USER PDR'S 

* THIS TEST WRITES TO EIGHT (8) DIFFERENT VIRTUAL ADDRESSES 
(VBA'S = 17776,37776.57776,77776,117770.137776,157776, £ 177776 

* £ PBA'S CONSTRUCTED = 17776,37776,57776,77776.77776. 

* 77776.77776. S 777776 RESPECTIVELY). 

* WHICH SHOULD CAUSE THE '\J-6IT" TO SET IN EACH OF THE 

* EIGHT (8) USER PAGE DESCRIPTOR REGISTERS. THE PDR'S 

* ARE CHECKED TO SEE THAT IT'S W-BIT DOES SET WHEN THE 

* PAGE IT IS MAPPED TO IS WRITTEN TO AND THAT THE W-BIT 

* DOES NOT SET IN ANY OF THE OTHER PDR'S. USER PDR'S 3,4,5,6 

* ARE MAPPED TO 12-16K FOR THIS TEST. ALSO THE W-BIT 

* SHOULD BE CLEARED WHEN THE PDR IS WRITTEN TO. THE 

* W-BIT PORTION OF THE PDR'S IS BEING CHECKED. 
**************************************************************** 

«;rnPF 

GO TO USER MODE FOR THIS TEST 
TURN TH3IT TRAPPING OFF FOR THIS TEST 
SET LOOP COUNTER TO 4 
LOAD ADDRESS OF PAR3 INTO RO 
LOAD ••12-16K" PAR VALUE INTO Rl 
MAP PARS 3-6 TO 12-16K 
LOOP TIL ALL 4 OF THEM LOADED 
LOAD ADDRESS OF FIRST PDR TO BE TESTED IN R5 
SET LOOP COUNTER TO 8 
INITIALIZE VIRTUAL ADDRESS TO BE IN R3 
SET LOOP ON ERROR POINTER TO 3$ 
LOAD ADDR. OF FIRST PDR TO BE SETUP IN RO 
SET LOOP COUNTER TO 8 
PUT 'VZ-BIT OFF DATA" INTO Rl 
CLEAR ALL W-BITS BY WRITING TO ALL PDRS 
LOOP UNTIL ALL OF THEM SETUP 
DO 'DATO" TO VIRTUAL ADDR. -SET TING A W-BIT 
DID THAT CAUSE W-BIT TO BE SET? 
BRANCH IF YES 

W-BIT DID NOT GET SET IN PDR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 3$" = 000763 

BR 8$ '-SKIP CHECKING OTHER PDR'S-ERROR WILL SET W-BITS 

5$: MOV #10. R2 ;SET LOOP COUNTER TO 8 

MOV #UIPDRO,RO .-LOAD ADDR. OF FIRST PDR TO BE CHECKED IN RO 

6$: BIT (RO).#WBIT ;DID W-BIT IN OTHER PDRS REMAIN CLEAR? 

BEQ 7$ .-BRANCH IF YES 

CMP R5.R0 ;IF W-B'T SET. THEN WAS IT PDR UNDER TEST? 
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127 W-eiT LOGIC TEST, USER PDR'S 



SEO 0053 



2W6 

2647 

2648 

2649 

2650 

2651 

2652 

2653 

2654 

2655 

2656 

2657 

2658 

2659 

2660 

2661 

2662 

2663 

2664 

2665 

2666 

2667 

2668 

2669 

2670 

2671 

2672 

2673 

2674 

2675 

2676 

2677 

2678 

2679 

2680 

2681 

2682 

2683 

2684 

2685 

2686 

2687 

2688 

2689 

2690 

2691 

2692 

2693 

2694 

2695 

2696 

2697 

2698 

2699 

2700 

2701 



025706 
025710 



025712 
025716 
025720 
025722 
025726 
025750 



025732 
025736 
025742 
025744 
025752 
025756 



001401 
104022 



062700 
07721 1 
010115 
031527 
001401 
104023 



062705 
062703 
077445 
012737 
004737 
005037 



025762 000004 



025764 
025770 
025774 
026002 
026006 
026012 
026016 
026022 
C26024 
026026 



026030 
026036 
026042 
026050 
026054 
026060 
026064 
026070 
026072 
026074 



004737 
012701 
012737 
010137 
013700 
010037 
013702 
020102 
001401 
104024 



072737 
010137 
012^37 
005037 
012706 
013702 
052701 
020102 
001401 
104025 



000002 



000100 



000002 
020000 

025556 
035302 
177776 



035246 
077406 
026002 
172316 
177572 
177572 
172316 



026030 
172314 
026054 
140000 
001100 
172314 
000100 



7$: 



8$: 



001110 



BEQ 
ERROR 



ADD 
SOB 
MOV 
BIT 
BEQ 
ERROR 



ADD 
ADD 
SOB 
MOV 
JSR 
CLR 



7$ 

22 



*2.R0 

R2.6$ 

R1,(R5) 

(R5).#WBIT 

8$ 

23 



»2,R5 
#20000, R3 
R4.3$ 

#1$,$LPERR 
PC, TON 
PSW 



BRANCH IF YES 

WH3IT GOT SET IN MORE 1HAN ONE PDR 
FOR TIGHTER SC0P5 LOOP 
REPLACE ERROR CALL WITH 
•BR 3$" = 000750 

POINT RO TO NEXT PDR TO BE CHECKED 
LOOP UNTIL ALL 8 CHECKED FOR CLEAR W-BIT 
WRITE TO THE PDR TESTED TO CLEAR W-BIT 
DID WRITING PDR CLEAR THE W-BK? 
BRANCH IF YES 

W-BIT DID NOT CLEAR BY WRITING THE PDR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 3$" = 000740 

POINT R5 TO THE NEXT PDR TO BE TESTED 
CHANGE VIRT. ADDR TO REF , NEXT PDR 
LOOP BACK TO 3$ UNTIL ALL 8 PDR'S TESTED 
RESET LOOP ON ERROR POINTER TO 1$ 
TURN TH9IT BACK ON FOR NEXT TEST 
BACK TO KERNEL MODE BEFORE LEAVING 



•A************************************-************************** 

iTEST 30 TEST '\J-BIT" SPECIAL CASES 



THIS TEST CHECKS TWO SPECIAL CASES OF THE WH3IT. FIRST CASE 
THAT THE WH3IT SHOULD NOT SET IN PDR 7 WHEN WRITING TO 
STATUS REG SRO (KERNEL PDR 7 IS USED). StCOND CASE IS THAT 
THE WH3IT IS STILL SET IF THE "l/ATO" IS ABORTED DUE TO A 
TIMEOUT ERROR (KERNEL PDR6 % VIRTUAL ADDR 140000 ARE USED). 

*********************************************** ****** 



IS 



TST30: SCOPE 



001110 



1$: 



2$: 



001110 3$. 
000004 

4S: 



JSR 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



MOV 
MOV 
MOV 
CLR 
MOV 
MOV 
BIS 
CMP 
BEQ 
ERROR 



PC, TOFF 

#77406, R1 

#2$,$LPERR 

R1.KIPDR7 

SfiO.RO 

RO.SRO 

KIPDR7,R2 

R1,R2 

3$ 

24 



#3$,$LPERR 

R1.KIPDR6 

#4$.ERRVEC 

a#l 40000 

#KERSTK,KSP 

KIPDR6.R2 

#100, R1 

R1,R2 

5S 

25 



TURN OFF T-aiT TRAPPING FOR THIS TEST 

PUT 'WH3IT OFF" VALUE FOR PDR IN Rl 

SET LOOP ON ERROR POINTER TO 2$ 

LOAD KERNEL PDR 7 TO CLEAR W-BIT 

READ PRESENT CONTENTS OF STATUS REG. 0 

WRITE PRESENT CONTENTS OF SRO BACK TO ITSELF 

READ CONTENTS OF KIPDR7 INTO R2 

WAS W-BIT LEFT CLEARED? 

BRANCH IF YES 

W-BIT IN KIPDR7 SET WHEN SRO WAS WRITTEN TO 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000765 

SET LOOP ON ERROR POINTER TO 3$ 

LOAD KERNEL PDR6 WITH 77406 TO CLEAR W-8IT 

SET UP LOC. 4 TO 4$ FOR ODD ADDR. ABORT 

CAUSE TIMEOUT ABORT THRU LOC. 4 

RESTORE THE STACK POINTER 

READ KIP0R6 INTO R2 

Rl -77506 

WAS W-BIT SET? 

BRANCH IF YES 

W-BIT WAS NOT SET DURING A TIMEOUT ABOP" 
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2702 
270^ 
270A 
2705 
2706 
2707 
2708 
2709 
2710 
2711 
2712 
2713 
27H 
2715 
2716 
2717 
2718 
2719 
2720 
2721 

2721 

272U 

272^ 

272b 

2727 

272% 

2729 

2750 

2731 

2732 

2733 

273A 

2735 

2736 

2737 

2738 

2739 

27A0 

2741 

27A2 

2743 

27AA 

27A5 

2746 

2747 

2748 

2749 

2750 

2751 

2752 

2753 

2754 

2755 

2756 

2757 



026076 
026102 
026110 
026116 
026124 



026132 
0261 36 
026142 
026146 
026152 
026156 
026164 
026172 
026176 
C26202 
026206 
026212 
026220 
026224 
026230 
026236 
026240 
026246 
026250 



026252 
026254 



010137 
012737 
012737 
012737 
004737 



026130 000004 



012700 
010037 
010037 
010037 
010037 
012737 
012737 
012700 
012701 
012703 
012702 
012737 
010237 
010237 
012737 
005010 
013737 
00521 1 
104026 



000425 
062706 



172314 
001400 
002076 
025764 
035302 



000600 
172346 
172350 
177646 
177650 
077406 
077406 
060000 
100000 
100011 
077400 
026254 
172310 
177610 
026236 



liACYll 30A(1052) 14-JAN-81 
T30 TEST 'V;-8]T* 



C 5 
11:36 PAGE 54 
SPECIAL CASES 



SEO 00*;^ 



172354 
000004 
001110 



5$: MOV R1.KIPDR6 

MOV *1400,KIPAR6 

MOV *TIMERR,ERRVEC 

MOV *1$,$LPERR 

JSR PC, TON 



FOR TIGHTER SCOPc LOOP 

REPLACE ERROR CALL WITH 

'BR 3$*' = 000757 

RESTORE KIPDR6 TO 77406 

RESTORE KIPAR6 TO 1400 

RESTORE NORMAL CPU TRAP ROUTINE TO LOG, 

RESET LOOP ON ERROR POINTER TO 1$ 

TURN T-eiT TRAPPING BACK ON 



THE NEXT THREE (3) TESTS CAUSE MEMORY MANAGEMENT ERRORS 
TO CHECK THE ABILITY OF STATUS REGISTER 0 TO RECORD KT 
ERRORS AND THE ABILITY OF STATUS REGISTER 2 TO LOCK UP THE 
VIRTUAL ADDR. OF THE INSTRUCTION THAT CAUSED THE ERROR. 
THE BITS OF SR2 ARE CHECKED AND BITS <15:13>. <6:5>, AND <3:0> 
ARE CHECKED IN SRO. SO THE SRO AND SR2 LOGIC AND THE 
KT ERROR LOGIC ARE CHECKED. 

•*»*»»•»»*»♦♦♦♦♦♦•♦»*♦**♦»♦♦♦»»•♦*♦♦♦♦♦»♦♦******»***»»*»»**•♦**» 

'•TEST 31 NON-RESIDENT ABORT TEST (ACF=0fc4) 



THIS TEST CHECKS THE ACCESS CONTROL FIEID (ACF) COMPARATOR 
LOGIC BY CAUSING NON-RESIDENT ABORTS IN BOTH KERNEL AND 
USE^ MODES. PDR 4 IS LOADED WITH ACF'S = 064 AND 
THFN PHYSICAL ADDR. 60000 IS ACCESSED TO CAUSE THE ABORT. 



**♦♦»♦♦»»•»•»♦♦»»»*»»♦♦♦♦»*•»•»»*♦♦♦»»♦********»***•**»*•*•••** 

tST31 : SCOPE 



1$: 



172306 
1 77606 



000250 2$: 



001110 



177776 001176 



000004 



3$: 
4S: 



5$; 



MOV #600. RO 

MOV R0,KIPAR3 

MOV R0,KIPAR4 

MOV R0.UIPAR3 

MOV R0.UJPAR4 

MOV #77406,KIPDR3 

MOV #77406,UIPDR3 

MOV #60000. RO 

MOV #1 00000, R1 

MOV #10001 1,R3 

MOV #77400, R2 

MOV #5$,MMVEC 

MOV R2,KIPDR4 

MOV R2.UIPDR4 

MOV #3$.$LPERR 

CLR (RO) 

MOV PSW.STMPO 

INC (R1) 

ERROR 26 



BR 8$ 
ADD #4.SP 



.-LOAD DATA FOR PAR'S INTO RO 
;MAP KERNEL PAR'S 364 TO 12-16K 

.-MAP USER PAR'S 364 TO 12-16K 

MAP KERNEL PDR 3 128 BLKS. READ-WRITE 

MAP USER PDR 3 128 BLKS. READ-WRITE 

LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 

LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R1 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R.. KERNEL, PG.4 

LOAD ACF=0 (NON-RESIDENT) PDR VALUE IN R2 

POINT MEM. MGMT. TRAP VECTOR TO 5$ BELOW 

LOAD ACF TEST VALUE INTO KIP0R4 

LOAD ACF TEST VALUE INTO UIPDR4 

SET LOOP ON ERROR POINTER TO 3$ 

CLEAR PHYS. LOC. 60000 USING PDR3 

SAVE PSW IN CASE OF ERROR 

TRY TO REF. IT USING PDR4 - SHOULD TRAP TO 51 
MEM. MGMT. ABORT DID NOT OCCUR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 3$" - 000772 

BRANCH AROUND STATUS REG. CHECKS IF NO ABOR^ 
RESTORF STACK POINTER 
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T31 NON-RESIDENT A80R1 TEST (ACf=0i4) 



SEO 005'. 



2758 

2759 

2760 

2761 

2762 

2763 

276^ 

2765 

2766 

2767 

2768 

2769 

2770 

2771 

2772 

2771 

277k 

277S 

2776 

2777 

277& 

2779 

2780 

2781 

2782 

2783 

278A 

2785 

2786 

2787 

2788 

2789 

2790 

2791 

2792 

2793 

279A 

2795 

2796 

2797 

2798 

2799 

2800 

2801 

2802 

2803 

2804 

2805 

2806 

2807 

2808 

2809 

2810 

2811 

2812 

2813 



026260 
026262 
026264 



026266 
026274 
026302 
026306 
026310 



026312 
026316 
026322 
026324 



026326 
026334 
02634? 
026344 
026350 
026356 
026360 
026364 
026366 
026372 
026376 
026402 
026404 
026410 
026416 



026424 
026426 

026426 
026432 
026436 
026442 
026446 
026454 



005710 
001401 
104027 



013737 
013737 
020337 
001401 
104030 



012704 
020437 
001401 
104031 



042737 
032737 
001006 
012703 
012737 
000715 
022702 
001407 
012702 
012703 
005037 
000703 
005037 
012737 
012737 



000004 



012700 
012701 
012703 
012702 
012737 
010237 



177572 
177576 
001272 



026246 
001274 



160000 
140000 

100151 
140000 

077404 

077404 
100011 
177776 

177776 
026132 
002750 



060000 
100000 
02001 1 
077402 
026510 
172310 



001272 6$: 
001274 



7$: 



177572 8$: 
001176 



177776 



001110 
000250 



9$: 



10$: 



TST (RO) 
BEQ 6S 
ERROR 27 



MOV SfiO,WASSRO 

MOV SR2,WASSR2 

CMP R3.WASSR0 

8E0 7S 

ERROR 30 



MOV *4$.R4 

CMP R4.WASSR2 

BEQ 8$ 

ERROR 31 



BIC *1 60000. SRO 

BJT *1 40000. STMPO 

BNE 9J 

MOV xn00151.R3 

MOV *1 40000. PSW 

BR 2S 

CMP #77404. R2 

BEQ 10$ 

MOV *77404.R2 

MOV *100011.R3 

CLR PSW 

BR 2$ 

CLR PSW 

MOV xrl$.$LPERR 

MOV MIGMERR.MMVEC 



DID INSTRUCTION GET ABORTED & NOT EXECUTE 
BRANCH IF YES 

INSTRUCTION WAS NOT ABORTED. LOC. GOI CHANGED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 3$" = 000764 

READ STATUS REGISTER 0 

READ STATUS REGISTER 2 

DID SRO REPORT NON-RESIDENT ERROR CORRECTLY? 
BRANCH IF YES 

SRO DID NOT REPORT NON-RES. ERROR CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 3$" = 000752 

LOAD R4 WITH WHAT SR2 SHOULD READ 

DID SR2 LOCKUP RIGHT VIRTUAL ADDR. ( 4$)? 

BRANCH IF YES 

SR2 DID NOT LOCK VIRTUAL ADDR. OF NON-RES. ERROR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 3$" = 000744 

CLEAR THE ERROR BITS IN SRO 

HAS ACF=064 BEEN TESTED IN USER YET 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R.. USER. PG.4 

GO TO USER MODE 

REPEAT TEST IN USER MODE 

HAS ACF=4 BEEN TESTED YET? 

BRANCH IF YES 

THEN LOAD ACF=4 (NON-RES) PDR VALUE IN R2 

LOAD R3 WITH WHAT SRO SHOULD RE AD-N.R. .KERNEL .PG. 4 

GO BACK TO KERNEL MODE 

GO BACK & TEST ACF=4 IN SAME MODE 

GO BACK TO KERNEL MODE BEFORE LEAVING 

RESET LOOP ON ERROR POINTER TO 1$ 

RESTORE ADDRESS OF NORMAL MEMORY 

MANAGEMENT ERROR ROUTINE TO MMVEC 



1$: 



000250 2$: 



*************************************************************** 

TEST 32 READ-ONLY ABORT TEST (ACF=2) 

THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATOR 
LOGIC BY CAUSING READ-WLY ABORTS IN BOTH KERNEL AND 
USER MODES. PDR 4 IS LOAD WITH ACF =2 AND THEN 
PHYSICAL ADDR. 60000 IS WRITTEN TO CAUSE THE ABORT. 

*************************************************************** 

TST32: SCOPE 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



/lf60000.RO 
/Ifl 00000. R1 
xr20011.R3 
#77402. R2 
#5$. MMVEC 
R2.KIPDR4 



KERNEL Z USER PAR'S 3 6 4 AND PDR 3 
ARE SETUP FROM LAST TEST 

LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 

LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R1 

LOAD R3 WITH WHAT SRO SHOULD READ - R/0. KERNEL. PG.4 

LOAD ACF=2 (READ-ONLY) PDR VALUE IN R2 

POINT MEM. MGMT. TRAP VECTOR TO 5$ BELOW 

LOAD ACF =2 INTO KIPDR4 
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T32 READ-ONLY ABORT TEST (ACr=2) 



S£0 0056 



28U 

28^5 

2816 

2817 

2818 

2819 

2820 

2821 

2822 

2823 

2824 

2825 

2826 

2827 

2828 

2829 

2830 

2831 

2832 

2833 

283A 

?^15 

2c36 

2837 

2838 

2839 

28A0 

28A1 

2842 

2843 

2844 

2845 

2846 

2847 

2848 

2849 

2850 

2851 

2852 

2853 

2854 

2855 

2856 

2857 

2858 

2859 

2860 

2861 

2862 

2863 

2864 

2865 

2866 

2867 

2868 

2869 



026460 
026464 
026472 
026474 
026502 
026504 



026506 
026510 
026514 
026516 
026520 



026522 
026530 
026536 
026542 
026544 



026546 
026552 
026556 
026560 



026562 
026570 
026576 
026600 
026604 
026612 
026614 
026620 
026626 



010237 
012737 
005010 
013737 
005211 
104026 



000425 
062706 
005710 
001401 
104027 



013737 
013737 
020337 
001401 
104030 



012704 
020437 
001401 
104031 



042737 
032737 
001006 
012703 
012737 
00071 5 
005037 
012737 
012737 



177610 
C26472 



001110 



177776 001176 



000004 



177572 
177576 
001272 



026502 
001274 



160000 
140000 

020151 
140000 

177776 
026426 
002150 



MOV R2,UIPDR4 

MOV *3$.$LPERR 

3$: CLR (RO) 

MOV PSW.STMPO 

4$: INC (Rl) 

ERROR 26 



BR 8S 

5$: ADD *4,SP 

TST (RO) 

BEO 6$ 

ERROR 27 



001272 6$: MOV SRO,WASSRO 

001274 MOV SR2,WASSR2 

CMP R3.WASSR0 

BEO 7$ 

ERROR 30 



7S: MOV #4S,R4 

CMP R4,WASSR2 

BEO 8$ 

ERROR 31 



177572 
001176 



177776 



00J110 
000250 



8$: BIG *1 60000, SRO 

BIT *1 40000, STMPO 

BNE 9S 

MOV #20151,R3 

MOV #1 40000, PSW 

BR 2$ 

9$: CLR PSW 

MOV *1$.$LPERR 

MOV «MGMERR.MMVEC 



LOAD ACF=2 INTO UIPDR4 

SET LOOP ON ERROR POINTER TO 3$ 

CLEAR PHYS. LOG. 60000 USING PDR3 

SAVE PSW IN CASE OF ERROR 

TRY TO WRITE USING PDR4 - SHOULD TRAP TO 5$ 

MEM. MGMT. ABORT DID NOT OCCUR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 3$" = 000772 

BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
RESTORE STACK POINTER 

DID INSTRUCTION GET ABORTED & NOT EXECUTE 
BRANCH IF YES 

INSTRUCTION WAS NOT ABORTED. LOC. GOT CHANGED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 3$" = 000764 

READ STATUS REG. 0 

READ STATUS REG. 2 

DID SRO REPORT READ-ONLY ERROR CORRECTLY? 
BRANCH IF YES 

SRO DID NOT REPORT R/0 ERROR CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 3$" = 000752 

LOAD R4 WITH WHAT SR2 SHOULD READ 

DID SR2 LOCKUP RIGHT VIRTUAL ADDR. ( 4$)? 

BRANCH IF YES 

SR2 DID NOT LOCKUP VIRTUAL ADDR. OF R/0 ERROR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 3$" = 000744 

CLEAR THE ERROR BITS IN SRO 

HAS ACF=2 BEEN TESTED IN USER MODE? 

BRANCH IF YFS 

LOAD R3 WITH WHAT SRO SHOULD READ-R/0, USER. PC. 4 

GO TO USER MODE 

REPEAT TEST IN USER MODE 

GO BACK TO KERNEL MODE BEFORE LEAVING 

RESET LOOP ON ERROR POINTER ''0 1$ 

RESTORE ADDRESS OF NORMAL MEMORY 

MANAGEMENT ERROR ROUTINE TO ftlVEC. 



THE NEXT TWO (2) TESTS WILL BE CHECKING THE PAGE LENGTH 



CJKOADO KTFII-AA MMU DIAG 
rjKOAO.Pn 19-DEC-80 11:05 



2B70 

287^ 

2B72 

2873 

2874 

2875 

2876 

2877 

2878 

2879 

2880 

2881 

2S82 

2883 

2884 

2885 

2886 

2887 

2888 

2889 

2890 

2891 

2892 

2893 

2894 

2895 

28% 

2897 

2898 

2899 

2900 

2901 

2902 

2903 

2904 

2905 

2906 

2907 

2908 

2909 

2910 

2911 

2912 

2913 

2914 

2915 

2916 

2917 

2918 

2919 

2920 

2921 

2922 

2923 

2924 

2925 
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T32 READ-ONLY A80R1 TEST {ACF=2) 



SEO 005/ 



COWARATORS AND SOME MORE OF THE KT ERROR DETECTION 
AND STATUS LOGIC. THE PAGE LENGTH FIELD (PLF) IN KERNEL 
PDR 4 IS VARIED AND FOR EVERY PLF. THREE (3) VIRTUAL 
ADDRESSES ARE READ. WHILE USING BOTH UPWARD I DOWNWARD PAGE 
EXPANSION. ONE OF THOSE THREE VIRTUAL ADDRESSES WILL CAUSE A 
•PAGE LENGTH f^ORJ" WHILE THE OTHER TWO WON'T. 

STATUS REGISTER 0 6 2 ARE CHECKED WHEN THE PAGE LENGTH 

ABORT DOES OCCUR TO SEE THAT THE ABORT IS REPORTED AND THAT 

THE VIRTUAc ADDRESS OF THE INSTRUCTION THAT CAUSED THE A80RT 
IS LOCKED UP. 



026634 
026636 
026644 
026652 
026656 
026662 
026666 
026674 
026702 



000004 
012737 
012737 
012700 
012704 
012701 
012737 
012737 
012706 



iTEST 33 PAGE LENGTH FAULTS-UPWARD EXPANSION 

* THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR 4 

* FRW 1 TO 177 AND FOR EACH PLF, THREE VIRTUAL ADDRESSES (VBA'S) 

* ARE ACCESSED. WHEN V8A <12:6> IS LESS THAN OR EQUAL TO PDR <14:8> 

* NO ABORT SHOULD OCCUR. WHEN VBA <12:6> IS GREATER THAN PDR <14:8>, 

* A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO & SR2. 

* THE PAGE EXPANSION DIRECTION IN THIS TEST IS UPWARD, (THE ED BIT 

* (BIT 3) OF PDR 4=0). 
* 

**************************************************************** 



077406 
077406 
027132 
027150 
000006 
027044 
026706 
001100 



172306 
172312 



000250 
001110 



TST33; SCOPE 
1$: MOV 
MOV 

nov 

MOV 

nov 

MOV 

MOV 
MOV 



*77406.KIPDR3 

#77406.KIPDR5 

WALTBl.RO 

#PDRT81 ,R4 

#6,R1 

#9*,«MVEC 

*2$.SLPERR 

#KERSTK,KSP 



MAKE SURE PDR3 IS DESCRIBED AS R/W 

MAKE SURE PDR5 IS DESCRIBED AS R/W 

DAL TABLE FOR VIRTUAL ADDR'S. TO SELECT PDR4. 

PDR TABLE FOR PDR4 (COINCIDES WITH DAL TABLE), 

SET UP LOOP COUNTER, 

SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 

SET LOOP ON ERROR POINTER TO 2S 

MAKE SURE STACK POINTER IS ALL SET UP 



026706 


012437 


172310 




2$: 


MOV 


(R4)+.KIPDR4 


026712 


005730 








TST 


a(RO)+ 


026714 


077104 








SOB 


R1.2S 










.•TEST 


ABORT 


CASES (VBA > PLF) 


026716 


012701 


000005 




3$: 


MOV 


#5.R1 


026722 


012700 


027166 






MOV 


#DAL T82.ro 


026726 


012704 


027202 






MOV 


<fPDRTB2.R4 


026732 


012737 


026746 


001110 




MOV 


#4$,$LPERR 


026740 


012737 


026760 


000250 




MOV 


#6$.MMVEC 


026746 


012437 


172310 




4$: 


MOV 


(R4)+,KIPDR4 


026752 


005730 






5$: 


TST 


S(RO)« 


026754 


104033 








ERROR 33 



;TEST NON-ABORT CASES (VBA < OR = PLF) 

LOAD KIPDR4 WITH PAGE LENGTH VALUE 

ACCESS VIRTUAL ADDR. (VBA < OR = PLF) 
NO ABORT SHOULD OCCUR! 1! 

DONE?... NO- TEST NEXT COMBINATION OF DAL & 



SET UP LOOP COUNTER. 
DAL TABLE 
PDR TABLE 

SET LOOP ON ERROR POINTER TO 4$ 

SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 



PDR. 



LOAD KIPDR4 WITH PAGE LENGHT VALUE 

ACCESS VIRTUAL ADDR, (VBA > PLF - ABORT TO 6tl 

EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 

FOR TIGHTER SCOPE lOOP 

REPLACE ERROR CALL WITH 
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T33 PAGE LENGTH FAULTS-UPWARD EXPANSION 



SEO 0056 



2926 

2927 

2928 

2929 

2950 

2931 

2932 

2933 

2934 

2935 

2936 

2937 

2938 

2939 

2940 

2941 

2942 

2943 

2944 

2945 

2946 

2947 

2948 

2949 

2950 

2951 

2952 

2953 

2954 

2955 

2956 

2957 

2958 

2959 

2960 

2961 

2962 

2963 

2964 

2965 

2966 

2967 

2968 

2969 

2970 

2971 

2972 

2973 

2974 

2975 

2976 

2977 

2978 

2979 

2980 

2981 



026756 
026760 
026764 
026772 
027000 
027004 
027010 
027012 



027014 
027020 
027024 
027026 



027030 
027036 
027040 
027044 
027050 
027054 
027062 
027070 
027076 



027100 
027104 
027110 

027112 
027120 



000424 
012706 
013737 
013737 
012702 
020237 
001401 
104034 



012703 
020337 
001401 
104035 



042737 
077135 
000137 
012637 
012637 
013737 
013737 
042737 
104032 



013746 
013746 

000002 

012737 
012737 



001100 
177572 
177576 
04001 1 
001272 



026752 
001274 



027112 
001266 
001270 
177572 
177576 
160000 



001270 
001266 



026636 
002150 



BR 8$ 

6$: MOV *KERSTK,<SP 

001272 MOV SRO.WASbKO 

001274 MOV SR2,UASSR2 

MOV *40011,R2 

CMP R2.WASSR0 

BEO 7$ 

ERROR 34 



7%: MOV *5$.R3 

CMP R3,WASSR2 

BEQ 8$ 

ERROR 35 



160000 177572 8$: 



027126 000137 027216 



BIC *1 60000, SRO 

SOB Rl,4$ 

JMP 10$ 

9$: MOV (KSP)+.TRAPPC 

MOV (KSP)+,TRAPPS 

001272 MOV SRO,WASSRO 

001274 MOV SR2,WASSR2 

177572 BIC *1 60000. SRO 

ERROR 32 



MOV TRAPPS.-(KSP) 

MOV TRAPPC,-(KSP) 
RTI 

001110 10$: MOV /lf1$,$LPERR 

000250 MOV #MGMERR,MMVEC 

JMP TST34 



'BR 5$" = 000776 

BRANCH AROUND ABORT CHECKS 

RESTORE STACK POINTER FOLLOWING ABORT 

READ M.M. STATUS REG. 0 

READ M.M. STATUS REG. 2 

PUT EXPECTED SRO CONTENTS IN R2 

DID SRO REPORT PG. LENGTH ABORT. PAGE 4, KERNEL' 

BRANCH IF YES 

SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 5$" = 000757 

PUT EXPECTED SR2 CONTENTS IN R3 

DID SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCHON? 
BRANCH IF YES 

SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 5$" = 000751 

CLEAR ERROR BITS IN SRO 

DONE?.. NO - GET NEXT DAL t PDR PAIR 

YES... 

SA(/E PC t PS OF TRAP 

SAVE CONTENTS OF SRO FOR ERROR 
SAVE CONTENTS OF SR2 FOR ERROR 
CLEAR ERROR BITS IN SRO 

GOT PG. LENGTH ABORT BEFORE IT WAS EXPECTED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

A 'NOP" = 000240 

PUT PC & PS OF TRAP ON STACK 

RETURN FROM UNEXPECTED ABORT 

RESET LOOP ON ERROR POINTER TO 1$ 
RESTORE NORMAL M.M. TRAP HANDLER 
ADDRESS TO M.M. TRAP VECTOR 



027132 
027134 
027136 
027140 
027142 
027144 
027146 



027150 
027152 
027154 
027156 
027160 
027162 



100000 
106100 
102300 
102500 
113700 
104600 
117700 



000006 
052006 
045006 
052006 
074406 
025006 



;DAu TABLE FOR UPWARD EXPANSION (NON-ABORT CASES) 
DAL TBI: 100000 

106100 

102300 

102500 

113700 

104600 

117700 

;PDR TABLE FOR KPDR4 (NON-ABORT CASES) 
PDRTBl: 000006 

052006 

045006 

052006 

074406 

025006 
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2982 

2983 

2984 

2985 

2986 

2987 

2988 

2989 

2990 

2991 

2992 

2993 

2994 

2995 

2996 

2997 

2998 

2999 

3000 

3001 

3002 

3003 

3004 

3005 

3006 

3007 

3008 

3009 

3010 

3011 

3012 

3013 

3014 

3015 

3016 

3017 

3018 

3019 

3020 

3021 

3022 

3023 

3024 

3025 

3026 

3027 

3028 

3029 

3030 

3031 

3032 

3033 

3034 

3035 

3036 

3037 



027164 077406 



027166 
0271 70 
027172 
027174 
027176 
027200 



027202 
027204 
027206 
027210 
027212 
027214 



027216 
027220 
027224 
027230 
027234 
027242 
027250 



027254 
027260 



100100 
110100 
116600 
112700 
1 1 7000 
117700 



000006 
030406 
046406 
042006 
073406 
077006 



J00004 
012700 
012704 
012701 
012737 
012737 
012706 



012437 
005730 



027262 077104 



027264 
027270 
027274 
027300 
027306 

027314 
027320 
027322 



012701 
012700 
012704 
012737 
012737 

012437 
005730 
104033 
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T33 PAGE LENGTH FAULTS-UPWARD EXPANSION 

077406 

;DAL TABLE (ABORT CASES) 
DALT82: 100100 

110100 

116600 

112700 

117000 

117700 

;PDR TABLE (ABORT CASES) 
PDRTB2: 000006 

030406 

046406 

042006 

073406 

077006 



**************************************************************** 



SEO 0059 



;*TEST 34 



PAGE LENGTH FAULTS-DOWNWARD EXPANSION 



THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR4 
FROM 176 TO 0 AND FOR EACH PLF, THREE VIRTUAL ADDRESSES (VBA'S) 
ARE ACCESSED. WHEN V8A <12:6> IS GREATER THAN OR EQUAL TO PDR <14:8> 
NO PAGE ABORT SHOULD OCCUR. WHEN VBA <12:6> IS LESS THAN PDR <14:8> 

;• A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO t SR2. 

THE PAGE EXPANSION DIRECTION IN THIS TEST IS DOWr*JARD. (THE ED BIT 

;* (BIT 3) OF PDR4=1). 

• * 

• . **•»*••»•»•»»►•*»»»**********••••••••******••**•**•**••**••*••* 



027500 
027516 
000006 
027412 
027254 
001100 



172310 



000005 
027534 
027550 
027314 
027326 

172310 



TST34; 
1$: 



000250 
001110 



SCOPE 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 



tfDAL TB3.ro 

/lfPDRTB3.R4 

*6.R1 

#9$.MMVEC 

#2$.$LPERR 

dfKERSTJC.KSP 



.-TEST NON-ABORT CASES (VBA > OR 
2$: MOV (R4)*,KIPDR4 
TST a(RO)* 



SOB 



R1.2$ 



001110 
000250 



.•TEST ABORT CASES (VBA < PLF) 

3$: MOV *5.R1 

MOV *DALT84,R0 

MOV JlfPDRT64.R4 

MOV JV4$.SLPERR 

MOV M6i,myEC 

4$: MOV (R4)+.KIPDR4 

5$; TST a(RO)* 

ERROR 33 



DAL TABLE FOR VIRTUAL ADDR'S. TO SELECT PDR4. 
PDR TABLE FOR PDR4 (COINCIDES WITH DAL TABLE). 
SET ltf> LOOP COUNTER. 

SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 

SET LOOP ON ERROR POINTER TO 2$ 

MAKE SURE STACK POINTER IS ALL SET UP 

: PLF) 

LOAD KIPDR4 WITH PAGE LENGTH VALUE 
ACCESS VIRTUAL ADDR. (VBA > OR = PLF) 
NO ABORT SHOULD OCCUR!!! 

DONE?... NO- TEST NEXT COMBINATION OF CAL ft PDR. 



SET UP LOOP COUNTER. 
DAL TABLE 
PDR TABLE 

SET LOOP ON ERROR POINTER TO 4$ 

SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 

LOAD KIPDR4 WITH PAGE LENGHT VALUE 
ACCESS VIRTUAL ADDR. (VBA < PLF - ABORT tq 6t) 
EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 
FOR TIGHTER SCOPE LOOP 



CJKOADO KTF11-AA mj DIAG 



CJKDAD. 


Pn 19-DEC-80 


50 5o 






TA7Q 








02732A 


000424 


50s 1 


027326 


012706 


TA/ 5 


027332 


013737 


50s5 


027340 


013737 


5U*»*» 


027346 


012702 


5U*»3 


027352 


020237 


SOsO 


027356 


001401 


ZA/ 7 


027360 


104034 


lA/.B 

50*»0 






TA/ Q 






1ACA 

5050 






503 1 


027362 


012703 


5U3c 


027366 


020337 


3053 


027172 


001401 


50 J*» 


027374 


104035 


50!>> 






5050 






505/^ 






5058 


027376 


042737 


505^ 


027404 


077135 


3000 


027406 


000137 


30O1 


027412 


012637 


30OC 


027416 


012637 


3U03 


027^,22 


013737 


3UOH 


027430 


013737 


30O5 


027436 


042737 


3000 


027444 


104032 


300f 






3UOO 






30oy 






1A7A 

30 rO 


027446 


013746 


3Uf 1 


027452 


013746 




027456 


000002 


3U' J 








027460 


012737 




027466 


012737 


30rO 






1A77 

3Ur f 


027474 


000137 


TA7B 

30 






TA7Q 

30 






•JAOA 

30t50 


027500 


117700 


7AB1 

300 1 


027502 


111600 


300c 


027504 


115400 


3U03 


027506 


115200 


3OOH 


027510 


104000 


30o5 


027512 


113100 


3000 


027514 


100000 


300' 














027516 


077416 


3090 


027520 


025416 


3091 


027522 


032416 


309? 


027524 


025416 


3093 


027526 


003016 



:05 
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SEO 0060 



027460 
001266 
001270 
^ 77572 
177576 
160000 



001270 
001266 



02722C 
002150 

027564 



BR 8$ 

6S: MOV »KERSTK.KSP 

001272 MOV SRO,WASSRO 

001274 MOV SR2.WASSR2 

MOV #4001 1.R2 

CMP R2,WASSR0 

BEQ 7$ 

ERROR 34 



7$: MOV #5$.R3 

CMP R3.WASSR2 

BEO 8S 

ERROR 35 



160000 177572 



8$: BIC *1 60000, SRO 

SOB R1.4$ 

JMP 10$ 

9$: MOV (KSP)+,TRAPPC 

MOV (KSP)+,TRAPPS 

001272 MOV SRO.WASSRO 

001274 MOV SR2.WASSR2 

177572 BIC #160000. SRO 

ERROR 32 



MOV TRAPPS.-(KSP) 

MOV TRAPPC.-(ICSP) 
RTI 

001110 10$: MOV #1$,$LPERR 

000250 MOV #MGMERR,MMVEC 

JMP TST35 



REPLACE ERROR CALL WITH 

"BR 5$" = 000776 

BRANCH AROUND ABORT CHECKS 

RESTORE STACK POINTER FOLLOWING ABORT 

READ M.M. STATUS REG. 0 

READ M.M. STATUS REG. 2 

PUT EXPECTED SRO CONTENTS IN R2 

DID SRO REPORT PG. LENGTH ABORT. PAGE 4. KERNEL? 

BRANCH IF YES 

SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 5$" = 000757 

PUT EXPECTED SR2 CONTENTS IN R3 

DID SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION? 
BRANCH IF YES 

SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 5$" = 000751 

CLEAR ERROR BITS IN SRO 

DONE?.. NO - GET NEXT DAL % PDR PAIR 

YES 

save' PC & PS OF TRAP 

SAVE CONTENTS OF SRO FOR ERROR 
SAVE CONTENTS OF SR2 FOR ERROR 
CLEAR ERROR BITS IN SRO 

GOT PG. LENGTH ABORT BEFORE IT WAS EXPECTED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

A "htOP" = 000240 

PUT PC ft PS OF TRAP ON STACK 

RETURN FROM UNEXPECTED ABORT 

RESET LOOP ON ERROR POINTER TO 1$ 
RESTORE NORMAL M.M. TRAP HANDLER 
ADDRESS TO M.M. TRAP VECTOR 



;DAL TABLE FOR DOWNWARD EXPANSION (NON-ABORT CASES) 
DALT83: 117700 

111600 

115400 

115200 

104000 

113100 

100000 

;PDR TABLE (NON-ABORT CASES) 
PDRTB3: 77416 

25416 

32416 

25416 

05016 



cjkoaoo ktfu-aa mmu diag 

rjKOAO.Pn 19-DEC-80 11:05 



3094 


027530 


052416 


3095 


027532 


000016 

WW ' w 


3096 






3097 






3098 


027554 


117600 


3099 


027536 


1 07600 


3100 


027540 


101100 


3101 


027542 


105000 


3102 


027544 


100700 


3103 


027546 


100000 


310A 






3105 






3106 


027550 


077416 


3107 


027552 


047016 


3108 


027554 


031016 


3109 


027556 


035416 


3110 


027560 


004016 


3111 


027562 


000416 


3112 






3113 






31 U 






3115 






3116 






3117 






3118 






3119 






3120 






3121 






3122 






3123 






3124 






3125 






3126 






3127 






3128 






3129 


027564 


000004 


3130 


027566 


012737 


3131 


027574 


012737 


3132 


027602 


012737 


3133 


027610 


012737 


3134 


027616 


012700 


5135 


02/622 


012701 


3136 


027626 


012737 


3137 


027634 


012737 


3138 


027642 


012720 


3139 


027646 


005020 


3140 


027650 


012720 


3141 


027654 


012710 


3142 


027660 


010107 


3143 


027662 


012706 


3144 


027666 


013737 


3145 


027674 


020137 


3146 


027700 


001401 


3147 


027702 


104036 


3148 






3149 
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FAULTS -DOWNWARD 



EXPANSION 



SEO 0061 



;DAL TABLE CA80RT CASES) 
DALT84: 117600 

107600 

101100 

105000 

100700 

100000 

;PDR TA8LE (A80RT CASES) 
PDRr84: 77416 

47016 

31016 

35416 

04016 

00416 



•TEST 35 



SR2 BIT TEST 



► THIS TEST CHECKS THE BITS IN MEMORY MANAGEMENT REGISTER 2 BY 

► CAUSING "READ-ONLY ABORTS" AT VIRTUAL ADDRESSES BETWEEN 100000 

► TO 110000 (PHYSICAL ADDRESSES 060000-070000). KIPDR4 IS USED TO EXECUTE 

► THE FOLLOWING FOUR WORDS OF CODE WHICH ARE MOVED THRU MEMORY: 

► 010727 MOV PC, (PC)* .-THIS INSTRUCTION SHOULD CAUSE A R/0 ABORT 

» 000000 .-ITS VIRTUAL ADDR. SHOULD BE LOCKED UP IN SR2 

► 000137 JMP a#3$ .-THIS INSTRUCTION IS ALSO MOVED THRU MEMORY 
* (ADDR. OF 3S) ;IN CASE A R/0 ABORT DOES NOT OCCUR, 

' :IN WHICH CASE SR2 WILL NOT CONTAIN CORRECT ADDR. 



000600 
000600 
077406 
077402 
060002 
100002 
027662 
027642 
010727 

000137 
027662 

001100 
1 77576 
001274 



172346 
172350 
172306 
172310 



000250 
001110 



TST35: 
1$: 



001274 



2$: 



3S: 



SCOPE 




MOV 


*600.KIPAR3 


MOV 


*600,KIPAR4 


MOV 


*77406.KIPDR3 


MOV 


*77402.KIPDR4 


MOV 


*60002.R0 


MOV 


#100002, R1 


MOV 


#3$.MMVEC 


MOV 


#2$.$LPERR 


MOV 


#010727, (RO)* 


CLR 


(RO)* 


MOV 


#0001 37. (RO)* 


MOV 


#3$,(R0) 


MOV 


R1,PC 


MOV 


#KERSTK.KSP 


MOV 


SR2,WASSR2 


CMP 


R1,WASSR2 


BEO 


4S 


ERROR 


36 



BE SURE PAR3 IS MAPPED TO 1 2-1 6IC 

BE SURE PAR4 IS MAPPED TO 12-16K 

MAP PAGE 3 128 BLOCKS, R/W 

MAP PAGE 4 128 BLOCKS, READ-ONLY 

LOAD RO WITH VIRTUAL ADDR. WHICH USES PDR3 

LOAD R1 WITH VIRTUAL ADDR. WHICH USES PDR4 

SET M.M. TRAP VECTOR TO 3$ 

SET LOOP ON ERROR POINTER TO 2$ 

LOAD "MOV PC. (PC)*" INSTRUCTION AT ADDR. 

REACHED THRU PDR/PAR 4. 
LOAD "JMP a#3t" INSTRUCTION AT VIRT. ADDR. 

IN CASE R/0 VIOL. DOES NOT ABORT 
TRANSFER PROGRAM EXECUTION TO 'PAGE 4 INSTRUCTIONS' 
RESTORE STACK POINTER 
READ CONTENTS OF STATUS REG 2 
WAS ADDR. OF 'mOCATED - R/0 ABORT" LOCKED UP? 
BRANCH IF YES 

SR2 DID NOT LOCK UP VIRTUAL ADDR. OF R/0 VIOL. 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
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K 5 
PAGE 



3150 

3151 

3152 

3153 

3154 

3155 

3156 

3157 

3158 

3159 

3160 

3161 

3162 

3163 

3164 

3165 

3166 

3167 

3168 

3169 

3170 

3171 

3172 

3173 

3174 

3175 

3176 

3177 

3178 

3179 

3180 

3181 

3182 

3183 

3184 

3185 

3186 

3187 

3188 

3189 

3190 

3191 

3192 

3193 

3194 

3195 

3196 

3197 

3198 

3199 

3200 

3201 

3202 

3203 

3204 

3205 



027704 
027712 
027714 
027716 
027722 
027726 
027712 

027734 
027742 
027750 



030032 
030040 
030046 
030052 
030056 
030060 



042737 
060101 
010100 
052701 
052700 
020127 
101743 



160000 177572 4$: 



100000 
060000 
110000 



012737 027566 001110 
012737 077406 172310 
012737 002150 000250 



5$: 



BIC #1 60000, SRO 

ADD R1.R1 

MOV R1 .RO 

BIS #100000. R1 

BIS #60000, RO 

CMP R1 ,^110000 

BLOS 2S 

MOV #1i,$LPERR 

MOV #77406.KIPDR4 

MOV *MGMERR,MMVEC 



62 



•BR 2$" = 000757 

CLEAR THE ERROR BITS IN SRO 

SETUP TO FORM NEXT VIRTUAL ADDRESS 

SETUP RO TO FORM NEXT VIRT. ADDR. TO LOAD 

FORM VIRTUAL ADDR. THAT SHOULD BE lOCKED UP NEXT 

POINT RO TO NEXT VIRT. ADDR. TO LOAD 

HAVE ALL VBA'S 100000-110000 BEEN TESTED? 

BRANCH IF NO 

RESET LOOP ON ERROR POINTER TO 1$ 
RESTORE PDR4 TO R/W ACCESS 
RESTORE ADDRESS OF NORMAL M.M. 
TRAP HANDLER TO M.M. VECTOR 



SEO 0062 



027756 


000004 






TST36: 


SCOPE 


#600.KIPAR5 


027760 


012737 


000600 


172352 


1$: 


MOV 


027766 


012737 


000406 


172310 




MOV 


/ir406,KlPDR4 


027774 


012737 


077402 


172312 




MOV 


#77402,KIPDR5 


030002 


012737 


030010 


001110 




MOV 


#2$,$LPERR 


030010 


013737 


177576 


001274 


2$: 


MOV 


SR2,WASSR2 


030016 


012701 


030010 






MOV 


*2$,R1 


030022 


020137 


001274 






CMP 


R1 ,WASSR2 


030026 


001401 








6EQ 


3$ 


030030 


104041 








ERROR 


41 



012737 
013737 
012701 
020137 
001401 
104041 



030040 001110 
177576 001274 
030040 
001274 



030062 


012737 


030070 


001110 


5$: 


MOV 


*6$,tLPERR 


030070 


012737 


030106 


000250 


6$: 


MOV 


#7$.MMVEC 


030076 


005037 


001200 






CLR 


STMPI 


030102 


005237 


100500 






INC 


a*i 00500 


030106 


012706 


001100 




7$: 


MOV 


#KERSTKASP 



*TEST 36 MORE CHECKS OF SRO & SR2 

• THIS TEST PERFORMS SOME ADDITIONAL CHECKS OF THE SRO & SR2 LOGIC. 

• FIRST IT CHECKS THAT SR2 'TRACKS" ALONG ACTING AS A VIRTUAL ADDRESS 

• PROGRAM COUNTER. ALSO SRO & SR2 ARE LOCKED UP BY A PAGE LENGTH 

» ABORT. THEN WITHOUT CLEARING SRO'S ERROR BITS. A R/0 ABORT IS CAUSED. 

• SRO & SR2 SHOULD NOT BE CHANGED BY THE SECOND ABORT AND THE 

• INFORMATION ABOUT THE PAGE LENGTH ABORT SOULD STILL BE LOCKED UP. 
IN ADDITION A "IRESET" IS EXECUTED TO VERIFY THAT SRO IS CLEARED 

• AND SR2 IS UNLOCKED BY A RESET. AFTER MEMORY MANAGEMENT IS TURNED BACK 

• SR2 IS CHECKED TO SEE THAT IT IS TRACKING AGAIN. 



MAP KERNEL PAGE 5 TO 12-16K 

SETUP PDR4 FOR PAGE LENGTH ABORT 

SETUP PDR5 FOR R/O ABORT 

SET LOOP ON ERROR POINTER TO 2$ 

READ SR2 TO SEE IF ITS TRACKING 

PUT EaPECTED VIRTUAL PC IN R1 

DID Sfi2 CONTAIN VIRTUAL PC AT 2S? 

BRANCH IF YES 

SR2 NOT TRACKING CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000767 

SET LOOP ON ERROR POINTER TO 4$ 

READ SR2 TO SEE IF ITS TRACKING 

PUT EXPECTED VIRTUAL PC IN Rl 

DID SR2 CONTAIN VIRTUAL PC AT 4$ 

BRANCH IF YES 

SR2 NOT TRACKING CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 4$" = 000767 

SET LOOP ON ERROR POlNTEn TO 6t 

PUT ADDRESS OF 7$ IN M.M. TRAP VECTOR 

CLEAR ERROR INDICATOR 

CAUSE PAGE LENGTH ABORT - TRAP TO 7» 

RESTORE STACK POINTER AFTER ABORT 



ON. 



3$: 
4$: 



MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



*4$.$LPERR 

SR2.WASSR2 

#4$,R1 

R1,WASSR2 

5S 

41 
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T36 MORE CHECKS OF SRC 



L 5 

PAGE 
I SR? 



5<:Uo 


n7rM 1 0 


01 7777 


1 77S70 


001 1 7f» 




n70i on 


01 7777 


1 77^ 7A 


001 ?uP 
vw 1 cwc 


7? AS 


OTni OA 


01 0777 

\j' Cf jf 


0X01 iO 


vUwc Jw 


5c\rr 


n7A1 7Z. 


OOC077 


1 oonoo 




701 n 

J£ 1 U 


n7m AO 


01 07OA 


001 100 
Uw 1 1 WW 


001 070 


751 1 


n7m AA 


01 7777 


1 77S7? 


701 0 


n7f»i CO 
U3U 1 ot 


01 77'?7 
VJ 1 J' J' 


1 77S7A 


001 ?7i 


751 7 


n7m *>n 


O077X7 

\JCJf jf 


001 1 7A 
Uw 1 1 f O 


001 P7? 

Vw i C' C 


701 A 


U jU I oo 


001 AOO 






701 ^ 
3c 1 0 


U Ov 1 ' \J 


oo';?^7 


001 ?00 

WW • c Vw 


001274 


OC 1 0 


0701 7A 




nni ?()? 

WW < cwc 


701 7 


oxn?n? 

U j\JCvC 


\J\J 1 HUc 






701 ft 




OOSP77 


noi ?oo 

V/w 1 C Vw 




701C 
OC 


O 7001 0 


00*; 7^7 


001 POO 




7oon 


07001 A 


001^01 

\J\J 1 HU 1 






7001 


O7O01 A 








7000 
JCCC 










^??3 










322A 










3225 


C30220 


005037 


001 200 




3226 


030224 


000005 




001272 


3227 


030226 


013737 


^ 77572 


3228 


030234 


005737 


001272 




3229 


030240 


001402 







8S: 



10$: 



11$: 



MOV SRO.fTMPO 

MOV SR2.$TMP2 

MOV *8$.MMVEC 

INC 3*120000 

MOV *KERSTK,KSP 

MOV SRO.WASSRO 

MOV SR2,WASSR2 

CMP $TMPO,WASSRO 

BEO 9$ 

INC $T,MP1 

CMP $TMP2.WASSR2 

BEO 10$ 

INC $TMP1 

TST $TMP1 

BEO 11$ 

ERROR 37 



CLR $TMP1 
RESET 

MOV SRO.WASSRO 

TST WASSRO 

BEO 12$ 



63 



SAVE SRO'S INFORMATION ON PG. LGTH. ABORT 

SAVE SR2'S INFORMATION ON PG. LGTH, ABORT 

PUT ADDRESS OF 8$ IN M.M. TRAP VECTOR 

CAUSE R/0 ABORT - TRAP TO 8S 

RESTORE STACK POINTER AFTER ABORT 

READ SRO FOLLWOING SECOND KT ABORT 

READ SR2 FOLLOWING SECOND KT ABORT 

IS SRO STILL HOLDING INFO ON FIRST ABORT'' 

BRANCH IF YES 

SET ERROR INDICATOR 

DOES SR2 STILL HOLD PC OF FIRST ABORT' 

BRANCH IF YES 

SET ERROR INDICATOR 

WERE SRO OR SR2 CHANGED BY A SECOND ABORT? 
BRANCH IF NO 

ONE OF STATUS REGS. CHANGED BY SECOND ABORT 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 6$" = 000726 

CLEAR ERROR INDICATOR 

EXECUTE A RESET, APPLYING AN "'INIT" 

READ SRO 

WAS SRO CLEARED BY THE RESET? 
BRANCH IF YES 



SEQ 0063 
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SEO 006A 



3230 
3231 
3232 
3233 
3234 
3235 
3236 
3237 
3238 
3239 
3240 
3241 
3242 
3243 
3244 
3245 
3246 
3247 
3248 
3249 
3250 
3251 
3252 
3253 
3254 
3255 
3256 
3257 
3258 
3259 
3260 
3261 
3262 
3263 
3264 
3265 
3266 
3267 



030242 
030246 
030254 
030262 
030264 
030270 
030274 
030276 



030300 
030306 
030314 
030320 
030324 
030326 



030330 
030336 
030344 
030352 



005237 
013737 
022737 
001402 
005237 
005737 
001401 
104040 



012737 
013737 
012701 
020137 
001401 
104041 



012737 
012737 
012737 
012737 



001200 

177576 001274 
030246 001274 

001200 
001200 



000001 177572 
177576 001274 
030306 
001274 



027760 001110 

077406 172310 

077406 172312 

002150 000250 



12$: 



13$: 



14$: 
15$: 



16$: 



INC $TMP1 

MOV SR2.WASSR2 

CMP #12$.WASSR2 

BEQ 13$ 

INC $TMP1 

TST $TMP1 

BEQ 14$ 

ERROR 40 



MOV *1.SR0 

MOV SR2.UASSR2 

MOV *15$.R1 

CMP R1.WASSR2 

BEQ 16$ 

ERROR 41 



MOV #1$,$LPERR 

MOV 77406, KIPDR4 

MOV #77406. KIPDR5 

MOV XfMGMERR.MMVEC 



SRO NOT CLEARED BV A RESET 
READ SR2 

WAS SR2 UNLOCKED BY A RESET? 
BRANCH IF YES 

SR2 NOT UNLOCKED BY A RESET 

UERE SRO & SR2 BOTH 'HESET" BY A RESET? 

BRANCH IF YES 

SRO OR SR2 NOT "RESET" BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 6$" = 000676 

TURN MEMORY MANAGEMENT BACK ON 

READ SR2 TO SEE IF ITS TRACKING AGAIN 

PUT EXPECTED VIRTUAL PC IN Rl 

DID SR2 CONTAIN VIRTUAL PC AT 15$ 

BRANCH IF YES 

SR2 NOT TRACKING CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

■BR 6$" = 000663 

RESET LOOP ON ERROR POINTER TO 1$ 
RESET PDR4 TO 128 BLKS. R/W 
RESET PDR5 TO 128 BLKS. R/W 
RESTORE ADDRESS OF NORMAL MEMORY 
MANAGEMENT TRAP ROUTINE TO M.M. VECTOR 



TEST j7 



USER ABORT PICKS UP KERNEL SPACE VECTOR 



THIS TEST CHECKS TO BE SURE THAT WHEN AN ABORT OCCURS WHILE IN 
USER MODE. THE TRAP VECTOR INFORMATION FETCHED IS TAKEN FROM 
KERNEL SPACE. USER PAGE 0 IS MAPPED TO 12K (60000-77776) SO 
THAT IF USER SPACE IS USED INSTEAD OF KERNEL. THE NEW PC THAT 
WAS LOADED AT LOC. 060004 IS USED INSTEAD OF THE NEW PC THAT 
SHOULD BE PICKED UP FROM LOC. 000004. A TIMEOUT ERROR IS USED 
TO CAUSE A TRAP TO "4". 



3268 










tST37: 






3269 


030360 


000004 






SCOPE 




3270 


030362 


004737 


035246 




1$: 


JSR 


PC. TOFF 


3271 


C30366 


012737 


030374 


001110 




MOV 


#2$.$LPERR 


3272 


030374 


005037 


177776 




2$: 


CLR 


PSW 


3273 


030400 


012706 


001100 






MOV 


#KERSTK.KSP 


3274 


030404 


012737 


000600 


1 77640 




MOV 


*600.UIPAR0 


3275 


030412 


012737 


030474 


000004 




MOV 


#4$,»V4 


3276 


030420 


012737 


000340 


000006 




MOV 


#340. a#6 


3277 


030 26 


012737 


140000 


177776 




MOV 


#140000. PSW 


3278 


030434 


012706 


000700 






MOV 


#USESTK.USP 


3279 


030440 


012737 


030460 


000004 




MOV 


#3$.i#4 


3280 


030446 


012737 


000340 


000006 




MOV 


#340.5I#6 


3281 


030454 


005737 


160000 






TST 


160000 


3282 
















3283 
















3284 


030460 


013701 


177776 




3$: 


MOV 


PSW.Rl 


3285 


030464 


010602 








MOV 


SP.R2 



TEST 



TURN OFF T-BIT TRAPPING FOR THIS 
SET LOOP ON ERROR POINTER TO 2$ 
GO TO KERNEL MODE 
SETUP KERNEL STACK PTR. 
MAP USER PAGE 0 TO 12K 
LOAD KERNEL VECTOR 4 (LOC. 4) WITH 4$ 
LOAD VECTOR+2 WITH NEW PSW 
GO TO USER MODE 
SETUP USER STACK PTR. 

LOAD USER VECTOR 4 (LOC. 60004) WITH 3$ 

LOAD VECTOR+2 WITH NEW PSW 

CAUSE TIMEOUT ERROR TRAP TO "4" 

SHOULD PICK UP NEW PC=4$ FROM KERNEL 

LOC. 4. NOT PC=3$ FROM USER LOC. 4 (^60004) 

SAVE PSW FOR ERROR 

SAVE VALUE OF STACK POINTER FOR ERROR 



CJKDADO KTfn-AA MMU DIAG 



^JKDAD. 


P11 19-DEC-80 


3286 


030A66 


AAC A77 

00503r 


3287 


030A72 


1 A/ A/ ^ 


3288 






3289 






3290 






3291 


ATA/ 7/ 

030AA 


AACA7'7 

00503r 


3292 


ATAC AA 

030500 


A1 "i^A^ 


3295 




AACA77 

00 jU3/ 


329A 


050310 


A1 D777 

Olcf 5f 


5295 


030310 


A1 57nA 
Ul c^Uo 


3296 


A7AC 


AA5A77 


5297 


A7AC Oil 


A1 0777 
Ul C^3^ 


5298 


ATAC7/ 


A1 0777 

Ul <?' 3' 


5299 


A7AC/ 


AA/ 777 


5300 






5301 






3502 






5305 






550A 






5505 






5306 






5507 






5508 


0jU3*»o 


AAAAAA 


3309 






3310 


AZACkA 

03033U 


ni 5777 


3511 


ATACCA 


yJicfyJc 


5512 


U3U!>Oc 


m n577 


5513 


ATACAA 

U3U30O 


U 1 c ' '♦0 


55U 




A1 5 7Z.A 


3315 


A7AC7/I. 


nnnnno 

UUUUUc 


3316 


A7rtAnA 
U lUOUU 


m 7701 


3317 


0:0604 


042701 


3318 


030610 


005037 


771 Q 

3 J 1 y 






3520 


A7AA1 A 
U 3UO 1 O 




3321 






3522 






3325 






3324 
3525 


030622 


012737 


5526 






5527 







1 77776 



1 77776 
001100 
177640 
140000 
000700 
y7777b 
002076 
030562 
055302 



030562 
170000 
^7777t 
000340 
030600 

^77776 
007437 
1 77776 



N 5 
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T37 USER ABORT PICKS UP KERNEL SPACE VECTOR 



SEO 0065 



4S: 



177776 



000004 
001110 



CLR 
ERROR 



CLR 
MOV 
CLR 
MOV 
MOV 
CLR 
MOV 
MOV 
JSR 



PSW 
42 



PSW 

*KERSTK.KSP 

UIPARO 

*1 40000. PSW 

*USESTK.USP 

PSW 

*TIMERR.a*4 
*1$.$LPERR 
PC, TON 



8F SURE BACK IN KERNEL MODE 

DID NOT TRAP THRU KERNEL SPACE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'13R 2$" = 000740 

BE SURE BACK IN KERNEL MODE 

RESTORE KERNEL S.P. IN CASE IT CHANGED 

REMAP USER PAGE 0 TO 0-4K 

GO TO USER MODE 

RESTORE USER STACK POINTER 

GO BACK TO KERNEL MODE 

RESTORE ADDR. OF NORMAL CPU TRAP HANDLER TO 4 
RESET LOOP ON ERROR POINTER TO IS 
TURN T-81T TRAPPING BACK ON 



RTI IN USER MODE DOES NOT CHANGE PSW 

THIS TEST CHECKS TO SEE THAT WHEN AN RTI IS EXECUTED IN USER 
MODE. THE MODE OR PRIORITY BITS OF THE PSW ARE NOT CHANGED. 



;*TESr 40 

- » 

;♦ 

•■»•»»*•***»♦»»♦*****»»»*•»*••*•••»♦»»**•♦*»**•**•♦♦•**•****•***• 

tST40: SCOPE 



001110 1$: 
2$: 

3$: 



MOV 


#2$.$LPERR 


MOV 


*1 70000, R2 


MOV 


R2.PSW 


MOV 


*340. -(SP) 


MOV 


*3$.-(SP) 


RTI 




MOV 


PSW,R1 


BIC 


#7437, R1 


CLR 


PSW 


CMP 


R2.R1 


BEO 


4$ 


ERROR 


60 



030550 001110 4$: 



MOV 



*1$.$LPERR 



SET LOOP ON ERROR POINTER TO 2$ 

LOAD •T'RESENT & EXPECTED" PSW VALUE INTO R2 

GO TO USER MODE-PRIORITY 0 

PUT A NEW PSW (PRIORI TY=7) ON STACK 

PUT NEW PC ON THE STACK 

DO AN RTI FROM USER MODE 

READ NEW PSW INTO Rl 

MASK OFF COND. CODE, T-8IT, AND UNUSED BITS 

GO BACK TO KERNEL MODE 

DID PSW STAY IN USER, PRIORI TY=0? 

BRANCH IF YES 

PSW CHANGED BY AN RTI FROM USER 
FOR A TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•13R-2$" = 000760 

RESET LOOP ON ERROR POINTER ^0 1$ 
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T41 KT ERROR SERVICED BEFORE TIMEOUT ERROR 



SEO 0066 



33C8 










3329 










5350 










3331 










3332 










3333 










333A 










3335 










3536 










3337 










3338 










3339 










33A0 


030630 


A AAA A / 

000004 






33A1 


030632 


A 4 ^ 7/\ P 

012705 


077006 




3342 


n7/\^ 7^ 

030636 


A4 77 

010537 


i 7^7i ^ 

1 7231 6 




33A3 


030642 


Ai ^1777 

012737 


A7rty 7A 

030670 


AAA AA/ 

000004 


35«>4 


030650 


'^777 

012737 


A7A^ 71 

030672 


AAA 1 C A 

000250 


3345 


030656 


012737 


030664 


f\t\ i i 1 A 

001110 


3346 


030664 


005(C?37 


i 777AA 

1 77700 




334 7 


C30670 


4 A / Ay 7 

104045 






3343 










3349 










3550 










3351 


030672 


012706 


/\Ai i AA 

001 100 




335Z 


rt7/\^ 7Z 

030676 


Ai 7777 

01 3737 


1 f f^fd 


AA 1 171 


77C 7 

3353 


030704 


Ai 7777 

01 3757 


1 775 r 6 


AAi 17/ 

001274 


77C / 

335A 


030712 
030/ 16 


Ai 'i7AA 


A/ AA1 7 

04001 7 




77C C 

3355 


A T AA77 

020037 


AA1 171 

001 27Z 




77c ^ 

3356 


030722 


AAi y Ai 

001401 






77f' 

3357 


/\7 / 

030724 


i A / A y y 

104044 






3358 










77Cn 

3359 










77Z A 

3360 










3361 


030726 


Ai 17Ai 

012701 


ATA^ t 

030664 




3562 


7rt 77 T 

030732 


rt ^rt i 7 7 

020137 


AAi 17y 

001 274 




T7Z^ 7 

3363 


T/\77^ 

030736 


A A i y A i 

001401 






3364 


030740 


i Ay A y y 

104044 






3365 










3366 










^7y 

3367 










77^ lJ 

3368 


030742 


Ay T777 

042737 


i d. AAAA 

1 60000 


i 77C 71 

1 77572 


3369 


/\7 A7C rt 

C30750 


Ai T77 7 

012737 


A 1 A7Z 

002076 


A AA y 

000004 


7 77A 

3370 


030756 


Ai 1777 

012737 


AA1i CA 

002150 


AAA 1C A 

000250 


7 774 

3371 


030764 


Ai J777 

012737 


rt77 y Ay 

077406 


i 717 i Z 

172316 


3372 


A7A77'^ 


012737 


030632 


A A i i i A 

oomo 


7777 

3373 










777/ 

3574 










77 7C 

3375 










77 7^ 

3376 










7777 

3377 










7770 

53' o 










3379 










3380 










3381 










3382 










3383 











TEST 41 



TST41 
1$: 



2$: 
3$: 



4$: 



6J: 



7$: 



KT ERROR SERVICED BEFORE TIMEOUT ERROR 



THIS TEST CHECKS TO SEE THAT IF A CERTAIN VIRTUAL ADDRESS THAT 

WOULD CAUSE A MEMORY WWAGEMENT ERROR CAUSES A TIMEOUT 

ERROR FIRST. THE TIMEOUT ERROR IS SERVICED BUT THE MEMORY 

MANAGEMENT ERROR ISN'T. THIS MEANS THAT SRO AND SR2 

SHOULD NOT REPORT THE ERROR OR LOCK UP ITS VIRTUAL ADDRESS. 

A READ-ONLY VIOLATION IS USED AS THE POTENTIAL MEMORY MANAGEMENT 

ERROR 



SCOPE 

MOV #77006, R5 

MOV R5,KIPDR7 

MOV #3$,a4f4 

MOV *4$.a#250 

MOV *2$.$LPERR 

INC a#1 77700 

ERROR 43 



MOV #KERSTK.KSP 

MOV SRO. WAS SRO 

MOV SR2.WASSR2 

MOV *40017,R0 

CMP RO.WASSRO 

BEO 6$ 

ERROR 44 



MOV #2$.R1 

CMP R1 .WASSR2 

BEO 7$ 

ERROR 44 



BIC #160000. SRO 

MOV #TIMERR.a#4 

MOV #«GMERR.a#250 

MOV #77406,KIPDR7 

MOV ^IS.SLPER"? 



LOAD PDR7 DATA INTO R5 

MAP PAGE 7 R/W PLF=176 

SET CPU TRAP VECTOR TO ADDRESS OF 3$ 

SET M.M. TRAP VECTOR TO ADDRESS OF 4S 

SET LOOP ON ERROR POINTER TO 2% 

CAUSE PLF ABORT AND POTENTIAL TIMEOUT 

TRAPPED THRU CPU TRAP VECTOR BUT SHOULDN'T HAVE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000776 

RESTORE STACK POINTER AFTER TRAPPING 

READ STATUS REG.O 

READ STATUS REG. 2 

LOAD EXPECTED SRO CONTENTS INTO RO 

SRO PLF ERROR BIT SET? 

BRANCH IF YES 

SRO DIDN'T REPORT PLF ERROR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2$" = 000741 

LOAD EXPECTED SR2 CONTENTS INTO R1 
WAS SR2 LOCKED BY PLF ABORT? 
BRANCH IF YES 

SR2 DIDN'T LOCK UP VIRTUAL ADDRESS 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2$" = 000741 

CLEAR ERROR BITS THAT WERE SfcT IN SRO 
RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 
RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 
REMAP PAGE 7 TO READ/WRITE PLF=177 
RESET LOOP ON ERROR POINTER TO 1$ 



TEST 42 



PC a PSW SAVED FOR KT ERROR DURING SERVICE OF TIMEOUT ERROR 



THIS TEST CHECKS THE PC AND PROCESSOR STATUS WORD SAVED WHEN 
A KT ERROR OCCURS DURING THE SECOND PUSH ON THE STACK DURING 
SERVICING OF A TIMEOUT ERROR. DURING A "DOUBLE ERROR" 
SEQUENCE SUCH AS THIS. THE PSW SAVED WILL BE THE ONE PICKED UP 
FROf VECTOR+2 (LOC. 6 IN THIS CASE) AFTER THE FIRST TRAP. 
NOT THE PSW PRESENT BEFORE THE FJRST TRAP. SRO AND SR2 



CJICOADO KTfll-AA m) DIAG 
rjKOAO.PIl 19-DEC-80 M :n5 



C 6 
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T42 PC & PSW SAVED FOR KT ERROR DURING SERVICE OF TIMEOUT ERROR 



SEO 0067 



3384 










• • 


SHOULD 


RECORD THE KT El 


3385 
















3386 










• • 


NOTE THAT THE PREVIOUS 


3387 










; • 


WILL BE 


SET IN THE PSU 


3388 










; • 






3389 










• •*•••••••••***•*•*******•**** 


3390 


031000 


000004 






TST42: 


SCOPE 




3391 


031002 


004737 


035246 




IS: 


JSR 


PC. TOFF 


3392 


031006 


012737 


000600 


1 77646 




MOV 


#600.UIPAR3 


3393 


031014 


012737 


000600 


177650 




MOV 


#600,UIPAR4 


3594 


031022 


012737 


077402 


177606 




MOV 


#77402, UIPDR3 


3395 


031030 


012737 


077406 


177610 




MOV 


#77406,UIPDR4 


3396 


031036 


012737 


031112 


000004 




MOV 


#4t«a#4 


3397 


031044 


012737 


140017 


000006 




MOV 


#140017,a#6 
#4$,a>>250 


3398 


031052 


012737 


031112 


000250 




MOV 


33'>9 


031060 


012737 


000340 


000252 




MOV 


#340.a#252 


3400 


031066 


012737 


031074 


001110 




MOV 


*2$.$LPERR 


3401 


031074 


012737 


140000 


1 77776 


2S: 


MOV 


#140000, PSW 


3402 


031102 


012706 


100002 






MOV 


#100002, USP 


3403 


031106 


005737 


1 77700 




3$; 


TST 


a#1 77700 


3404 
















3405 


031112 


016601 


000002 




4S: 


MOV 


2(KSP) ,R1 


3406 


031116 


011603 








MOV 


(KSP) ,R3 


3407 


031120 


013737 


177572 


001272 




MOV 


SRO.WASSRO 


3408 


031126 


013737 


177576 


001274 




MOV 


SR2,WASSR2 


3409 


031134 


042737 


160000 


177572 




BIC 


#1 60000, SRO 


3410 


031142 


005037 


177776 






CLR 


PSU 


3411 


031146 


012706 


001100 






MOV 


#KERSTK,KSP 


3412 


031152 


012737 


140000 


1 77776 




MOV 


#140000, PSU 


3413 


031160 


012706 


000700 






MOV 


#USESTK,USP 


3414 


031164 


005037 


177776 






CLR 


PSU 


3415 


031 1 70 


005037 


001176 






CLR 


STMPO 


3416 


031174 


020127 


170017 






CMP 


Rl ,#1 70017 


3417 
















3418 
















3419 
















3420 


031200 


001402 








BEQ 


5$ 


3421 


031202 


005237 


001 1 76 
031112 






INC 


STMPO 


3422 


031206 


020327 




5$: 


IMP 


Ri,#3$+4 


3423 
















3424 


031212 


001402 








BEO 


6S 


3425 


031214 


005237 


001 176 






INC 


STMPO 


3426 


031220 


023727 


001272 


020147 


6$: 


CMP 


WASSR0,#20147 


3427 


031226 


001402 








BEQ 


7$ 


3428 


031230 


005237 


001 1 76 






INC 


^ Tun A 


3429 


031234 


025727 


001274 


031106 


7$; 


CMP 


UASSR2,#3$ 


3430 
















3431 


031242 


001402 








BEQ 


8$ 


3432 


031244 


005237 


001176 






INC 


STMPO 


3433 


031250 


005737 


001176 




8$: 


TST 


STMPO 


3434 


031254 


001401 








BEO 


9S 


3435 


031256 


104045 








ERROR 


45 


3456 
















34 37 
















3438 
















3439 

















TURN T-8IT TRAPPING OFF FOR THIS TEST 

MAP USER PAGE 3 TO 12-16K 

MAP USER PAGE 4 TO 12-16K 

MAP USER PAGE 3 READ-ONLY 

M^P USER PAGE 4 READ/WRITE 

LOAD ADDRESS OF 4S IN CPU (TIMEOUT) VECTOR 

LOAD PSU THAT SHOULD BE PUT ON STACK IN VECT0R*2 

LOAD ADDRESS OF 4S IN M.M. TRAP VECTOR 

LOAD A KERNEL PSU IN MMVEC*2 

SET LOOP ON ERROR POINTER TO 2S 

GO TO USER MODE 

SET USER STACK PTR. SO SECOND PUSH IS IN PG. 3 

CAUSE TIMEOUT ERROR THAT UILL CAUSE 

R/0 ERROR UHEN TRY TO SAVE OLD PC 

PUT PSU SAVED ON KERNEL STACK INTO Rl 

PUT PC SAVED ON KERNEL STACK INTO R3 

READ THE CONTENTS OF M.M. STATUS REG. 0 

READ THE CONTENTS Of M.M. STATUS REG. 2 

CLEAR THE ERROR BHS IN SRO 

BE SURE IN KERNEL MODE 

RESTORE KERNEL STACK POINTER 

GO TO USER MODE 

RESTORE USER STACK POINTER 

GO BACK TO KERNEL MODE 

CLEAR ERROR INDICATOR 

WAS THE PSU SAVED THE ONE PICKED UP BY THE 

TIMEOUT TRAP FROM ERRVEC+2? 

VALUE 170017 = PSW FROM LOC. 6 WITH 

PREVIOUS MODE BITS = USER 

BRANCH IF YES 

WRONG PSW SAVFp piJPiNG "DOUBLE ERROR" SEQUENCE 
WAS THE PC AT THE TIME OF THE TIMEOUT ERROR 
SAVED ON THE STACK? 
BRANCH IF YES 

WRONG PC SAVED DURING TRAP SEQUENCE 

DID SRO REPORT - USER. PAGE 3. R/0 ABORT? 

BRANCH IF YES 

SRO DID NOT REPORT R/0 ABORT 
DID SR2 LOCK UP VIRTUAL ADDR. OF LAST 
INSTRUCTION SUCCESSFULLY FETCHED? 
BRANCH IF YES 

SR2 DID NOT LOCK UP ADDR. OF TIMEOUT INST. 
ANY "ERRORS" DURING TRAP SEQUENCE? 
BRANCH IF NO 

THE WRONG PC OR PSW WERE SAVED 
OR SRO OR SR2 DID NOT REPORT R/0 
ERROR DURING TIMEOUT - KT TRAP 
SEQUENCE 

FOR TIGHTER SCOPE LOOP 
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3440 
3441 
5442 
3443 
3444 
3445 
3446 
344 7 

3448 

3449 

3450 

3451 

3452 

3453 

3454 

3455 

3456 

3457 

34 58 

3459 

3460 

3461 

3462 

3463 

3464 

3465 

5466 

3467 

3468 

3469 

3470 

3471 

34 72 

3473 

3474 

3475 

3476 

3477 

3478 

3479 

3480 

3481 

3482 

3483 

3484 

3485 

3486 

3487 

3488 

3489 

3490 

3491 

3492 

3493 

3494 

3495 



031260 
031266 
031274 
031302 
031310 
051316 



031322 
031324 
031330 
031356 
051544 
031352 
031360 
031566 

051572 
051576 
051402 
031404 
031406 
031412 
051416 
051420 
051422 
031430 
031436 
051444 
031452 
031460 
031466 
051466 
031474 
031502 
031510 



012737 
012737 
012737 
012737 
012737 
004737 



000004 
005037 
012737 
012737 
012737 
012737 
012737 
012700 

012702 
012701 
010021 
077202 
012702 
012701 
010021 
077202 
012737 
012737 
012737 
012737 
012737 
012737 

012737 
012737 
012737 
012700 



002076 
000540 
0021 50 
077406 
031002 
055502 



1 72540 
000200 
000400 
000600 
000600 
007600 
077406 

000010 
172300 



000010 
177600 



000000 
000200 
000400 
000600 
007600 
051466 

077406 
000600 
000600 
036514 



000004 
000006 
000250 
177606 
001110 



172342 
1 72344 
1 72346 
1 72350 
172356 



177640 
177642 
177644 
177646 
177656 
001110 

172310 
172350 
177650 



T42 



9$: 



D 6 
11:36 PAGE 68 



PC & PSU SAVED FOR KT ERROR DURING SERVICE OF TIMEOUT ERROR 



SEO 006 f- 



MOV *TIMERR.a*4 

MOV *340.a/r6 

MOV #MGMERR,a#250 

MOV *77406.UIPDR3 

MOV *1$,$LPERR 

JSR PC, TON 



REPLACE ERROR CALL WITH 
•BR 2%" = 000710 

RESTORE ADDRESS OF NORMAL CPU TRAP HANDLEK 

RELOAD ERRVEC+2 WITH KERNEL PSW 

RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 

REMAP USER PAGE 3 READ/WRITE 

RESET LOOP ON ERROR POINTER TO 1$ 

TURN TH9IT TRAPPING BACK ON 



* 

► THIS GROUP Of TESTS WILL TEST ALL THE LOGIC ASSOCIATED WITH 

► THE 'WOVE FROM PREVIOUS" AND MOVE TO PREVIOUS" INSTRUCTIONS. 

****************** 



•TEST 43 



MOVE FROM PREVIOUS (USER) I-SPACE 



THIS TEST USES THE 'MFPI' INSTRUCTION TO ENSURE THAT THE 
PREVIOUS MODE IS CLOCKED CORRECTLY 

THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED. 

If THE CORRECT MODE (USER) IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 23$. WHERE THE ERRORS ARE REPORTED. 



TST43: 
1$: 



2$: 
3$: 



4$: 



SCOPE 




CLR 


KIPARO 


MOV 


#200. K I PARI 


MOV 


#400.KIPAR2 


MOV 


#600.KIPAR3 


MOV 


*600.KIPAR4 


MOV 


#7600. K I PAR 7 


MOV 


#77406. RO 


MOV 


#10. R2 


MOV 


#KIPDR0,R1 


MOV 


R0,(R1)<- 


SOB 


R2,2$ 


MOV 


#10.R2 


MOV 


#UIPDR0.R1 


MOV 


RO.(RI)* 


SOS 


R2.3$ 


MOV 


#000.UIPAR0 


MOV 


#200, UI PARI 


MOV 


#400.UIPAR2 


MOV 


#600,UIPAR5 


MOV 


#7600. U I PAR 7 


MOV 


#4$.$LPERR 


MOV 


#77406.KIPDR4 


MOV 


#600.KIPAR4 


MOV 


#600,UIPAR4 


MOV 


#3651 4. RO 



MAP KERNEL PAGE 0 
MAP KERNEL PAGE 1 
MAP KERNEL PAGE 
MAP KERNEL PAGE 
MAP KERNEL PAGE 
MAP KERNEL PAGE 



2 
3 
4 
7 



TO 0-4K 
TO 4-8K 
TO 8-1 2K 
TO 12-16K 
TO 12-16K 
TO THE I/O PAGE 
MAKE ALL KERNEL I-SPACE PAGES RESIDENT 
READ/WRITE, LENGTH 200 BLOCKS 
SET LOOP COUNTER TO 8 
PUT ADDRESS OF FIRST PDR IN R1 
LOAD PDR WITH 77406 
LOOP TO 2$ UNTIL ALL PDRS LOADED 
SET LOOP COUNTER TO 8 
PUT ADDRESS OF FIRST PDR IN R1 
LOAD PDR WITH 77406 
LOOP TO 3$ UNTIL ALL PDRS LOADED 
MAP USER I PAGE 0 TO 0-4K 
TO 4-8K 
TO 8-1 2K 
TO 12-16K 
TO THE I/O PAGE 



MAP USER I PAGE 

MAP USER I PAGE 

MAP USER I PAGE 

MAP USER I PAGE 



1 
2 
3 
7 



SET LOOP ON ERROR TO 4$ 

KERNEL I-SPACE PAGE 4 READ/WRITE 
MAP KERNEL I PAGE 4 TO 12K 
MAP USER I PAGE 4 TO 12K 
LOAD DATA PATTERN INTO RO 



CJKDAOO KTF11-AA mj DIAG 
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100000 
032122 
172310 



3496 


031514 


010037 


5497 


031520 


012737 


3A98 


031 526 


105037 


3499 






3500 






3501 


031532 


012737 


3502 


031540 


012737 


3503 


031546 


006506 


3504 






3505 


051550 


022706 


5506 


051554 


001407 


3507 


051556 


012600 


5508 


051 560 


012701 


5509 


051564 


020001 


5510 


051566 


001403 


5511 


031570 


104046 


3512 






5515 






5514 






5515 


051572 


000401 


3516 


031 574 


104050 


3517 






5518 






5519 






5520 


031 S76 




5521 


051576 


012757 


5522 


051604 


012700 


5525 


051610 


012757 


5524 


051616 


012702 


5525 


051622 


006512 


5526 


051624 


012601 


5527 


051626 


020001 


5528 


051650 


001401 


5529 


031632 


104046 


5550 






3531 






3532 






3553 


031634 




3554 


031654 


012757 


5555 


031642 


012757 


5536 


031650 


012702 


3557 


031654 


0065^.2 


5538 


031656 


012601 


3559 


031660 


020001 


5540 


031662 


001401 


5541 


031664 


104046 


5542 






3545 






5544 






3545 


031666 




3546 


031666 


012737 


3547 


031674 


012737 


3548 


031702 


006557 


3549 


031706 


012601 


3550 


051710 


020001 


3551 


051712 


001401 



031540 
030340 



001100 
000700 
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T43 MOVE hROM PREVIOUS (USER) 1-SPACE 



SEO 006y 



000250 



001110 
177776 5$: 
6S: 



7$: 



8S: 



001110 
177776 9$: 



001110 
177776 



10$: 
11$: 



001110 
177776 



12$: 
15$: 



MOV RO.aXf 100000 
MOV #23$,MMVEC 
CLR8 KIPDR4 



;THE FOLLOWING WILL TEST DSTM=0 MFPI 



LOAD DATA PATTERN INTO PHV 60000 

SET M.M. VECTOR TO 23$ 

MAKE KERNEL I-SPACE PAGE 4 NON-RESIDENT 



MOV 
MOV 
MFPI 

CMP 
BEQ 
MOV 
MOV 
CMP 
BEQ 
ERROR 



BR 

ERROR 



#5$.$LPERR 
#030340, PSW 

USP 

*KiRSTK.KSP 
7$ 

(KSP)+.RO 

#US£STK,R1 

R0.R1 

8$ 

46 



8$ 

50 



.-THE FOLLOWING WILL 



MOV 
MOV 
MOV 
MOV 
MFPI 
MOV 
CMP 
BEQ 
ERROR 



#9$,$LPERR 
*365K,R0 
*030540,PSW 
*1 00000. R2 
(R2) 

(KSP)*,R1 

R0.R1 

10$ 

46 



;THE FOLLOWING WILL 



MOV 
MOV 
MOV 
MFPI 
MOV 
CMP 
BEQ 
ERROR 



#11$.$LPERR 
*030340.PSW 
#1 00000. R2 
(R2)* 
(KSP)*,R1 
R0.R1 
12$ 
46 



.-THE FOLLOWING WILL 



MOV 
MOV 
MFPI 
MOV 
CMP 
BEQ 



*13$.$LPERR 
#030340, PSW 

a#i 00000 

(KSP)+,R1 

R0,R1 

14$ 



SET LOOP ON ERROR POINTER TO 5$ 
MAKE PREVIOUS MODE USER 
PUT USER STACK POINTER ON KERNEL 

STACK 

WAS SOMETHING PUSHED ON STACK AT 6$ 
BRANCH IF NOTHING WAS PUSHED 
POP KERNEL STACK INTO RO 
EXPECTING TO GET 700 AS USP 
DID VOU GET THE RIGHT POINTER? 
BRANCH IF YOU DID 
WRONG THING WAS PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 5$'" = 000763 
BRANCH TO NEXT TRY 
NOTHING PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 5$*" = 000761 
TEST DSTM=1 MFPI. 

SET LOOP ON ERROR POINTER TO 9$ 
RELOAD DATA PATTERN IN RO 
MAKE PREVIOUS MODE USER 
LOAD VIRTUAL ADDRESS INTO R2 
READ FROM PHYSICAL 60000 
POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 9$" = 000766 
TEST DSTM=2 MFPI. 

SET LOOP ON ERROR POINTER TO 11$ 
MAKE PREVIOUS MODE USER 
LOAD VIRTUAL ADDRESS INTO R2 
READ FROM PHYSICAL 60000 
POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 11V = 00C766 
TEST'DSTM=3 MFPI. 

SET LOOP ON ERROR POINTER TO 13$ 
MAKE PREVIOUS MODE USER 
READ FROM PHYSICAL 60000 
POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
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071 714 


10404^ 




J J J J 
















J J J J 








^^^^ 


031 716 






jjjf 


031 716 


012737 

VIC* 


031724 

VJ ' ' C~ 


J J JO 


031 ?4 

\Jj \ C"* 


01?737 


030340 




031 73? 


01?702 


1 00002 

1 wwc 




031736 


006542 






0^1 740 


01 2601 






03174? 


0?0001 






031 744 


001401 








1 04046 




JJ\JJ 


























031 750 














3570 








^571 


C31750 


012737 


031 756 


357? 


031756 


012737 

VIC' J ' 


030340 


3573 


031764 


012737 


100000 


3574 


031 772 


012702 


001204 


3575 


031776 


006552 




3576 


032000 


012601 




3577 


032002 


020001 




3578 


032004 


001401 




3579 


032006 


104046 




3580 








3581 

J JO 1 








3582 








3583 


032010 






3584 








3585 


032010 


012737 

VIC' ^' 


032016 


3586 


032016 


012737 


0303A0 


3587 


03202A 


005002 




3588 


032026 


006562 


100000 

• www 


3589 


032032 


012601 




3590 


032034 


020001 




3591 


032036 


001401 




359? 


032040 


104046 

1 V~V~ V 




3593 
















3595 








3596 


032042 






3597 








3598 


032042 


012737 


032050 


3599 

J J WW 


032050 


012737 


030340 


3600 


032056 


012737 

VIC' ^ ' 


100000 

1 www 


3601 


032064 


012702 


001202 


3602 


032070 


006572 


000000 


3603 








3604 


032074 


012601 




3605 


032076 


020001 




3606 


032100 


001401 




5607 


032102 


104046 
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T43 MOVE FROM PREVIOUS (USER) I-SPACE 



SEO 007G 



US: 

001110 
177776 15$: 



16$: 



001110 
177776 17$: 
001202 



18$: 

001110 
177776 19$: 



20$: 

001110 
177776 21$: 
001202 



ERROR 46 



;THE FOLLOWING WILL TEST 

MOV *15$,$LPERR 

MOV *030340,PSW 

MOV *1 00002, R2 

MFPI -(R2) 

MOV (K3P)^.R1 

CMP R0,R1 

BEO 16$ 
ERROR 46 



WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
"BR 13$" = 000767 
DSTM=4 MFPI. 

SET LOOP ON ERROR POINTER TO 15$ 

MAKE PREVIOUS MODE USER 

LOAD VIRTUAL ADDRESS INTO R2 

READ FROM PHYSICAL 60000 

POP KERNEL STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 15$" = 000766 



;THE FOLLOWING WILL TEST DSTM=5 MFPI. 



SET LOOP ON ERROR POINTER TO 17$ 
MAKE PREVIOUS MODE USER 
LOAD TEST LOC. VIRT. ADDR INTO LOC. $TMP2 
LOAD ADDR. OF $TMP2+2 INTO R2 
READ FROM PHYSICAL 60000 
POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
:-'BR 17$" = 000763 
;THE FOLLOWING WILL TEST DSTM=6 MFPI. 



MOV 
MOV 
MOV 
MOV 
MFPI 
MOV 
CMP 
6EQ 
ERROR 



*17$,$LPERR 

*030340.PSW 

*1 00000, $TMP2 

/ir<$TMP2+2>,R2 

a-(R2) 

(KSP)*.R1 

R0.R1 

18$ 

46 



MOV 

MOV 

CLR 

MFPI 

MOV 

CMP 

BEQ 

ERROR 



#19$.$LPERR 
*030340.PSW 
R2 

1 00000 (R2) 

(KSP)*.R1 

R0.R1 

20$ 

46 



;THE FOLLOWING WILL TEST 

MOV *21$,$LPEPR 

MOV #030340, PSW 

MOV *100000.$TMP2 

MOV «TMP2,R2 

MFPI aO(R2) 

MOV (KSP)*,R1 

CMP R0,R1 

BEO 22$ 

ERROR 46 



SET LOOP ON ERROR POINTER TO 19$ 

MAKE PREVIOUS MODE USER 

MAKE REGISTER 2 A ZERO 

READ FROM PHYSICAL 60000 

POP KERNEL STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 19$" = 000766 

DSTM=7 MFPI. 

SET LOOP ON ERROR POINTER TO 21$ 

MAKE PREVIOUS MODE USER 

LOAD TEST LOC. V.A. INTO $TMP2 

LOAD ADDRESS OF $TMP2 INTO R2 

USE $TfV>2 TO FETCH VIRTUAL 

ADDRESS OF 60000 

POP KERNEL STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 
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Cj5oAO.P11 19-0EC-80 11:05 T43 MOVE FROM PREVIOUS (USER) 1-SPACE 



SEO 0071 



3608 

3609 

3610 

3611 

3612 

3613 

36U 

3615 

3616 

3617 

3618 

3619 

3620 

3621 

3622 

3623 

362A 

3625 

3626 

3627 

3628 

3629 

3630 

3631 

3632 

3633 

3634 

3635 

3636 

3637 

3638 

3630 

3640 

3641 

3642 

3643 

3644 

3645 

3646 

3647 

3648 

3649 

3650 

3651 

3652 

3653 

3654 

3655 

3656 

3657 

3658 

3659 

3660 

3661 

3662 

3663 



032104 
032112 
032120 



032122 
032126 
032132 
032140 
032146 
032154 



032156 
032162 
C32166 



032170 
032172 
032200 
032206 
032214 
032222 



032230 
032236 
032242 
032244 
032246 
032250 
032254 
032256 



012737 
012737 
000423 



012637 
012637 
013737 
013737 
042737 
104051 



013746 
013746 
000002 



002150 000250 22$: 
031324 001110 



001266 
001270 
177572 
177576 
160000 



001270 
001266 



000004 

012737 077406 

012737 077406 

012737 000600 

012737 000600 

012737 033002 



012737 030340 
012746 007777 
006606 
006506 
012601 

022701 007777 

001401 

104050 



23$: 



001272 
001274 
177572 



MOV 
MOV 
BR 



MOV 
MOV 
MOV 
MOV 
BiC 
ERROR 



MOV 
MOV 
RTI 



#MGMERR.MMVEC 
#1$.$LPERR 

TST44 



(»(:SP)*.TRAPPC 

(K3P)>-.TRAPPS 

SRO.UASSRO 

SR2.UASSR2 

»1 60000. SRO 

51 



TRAPPS,-(KSP) 
TRAPPC,-{KSP) 



FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 21$" = 000762 

SET M.M. VECTOR TO NORMAL ROUTINE 

SET LOOP T'OINTER TO START OF TEST 

.•BRANCH lO NEXT TEST 



SAVE PC & PS OF TRAP 

SAVE SRO FOR ERROR TYPEOUT 

SAVE SR2 FOR ERROR TYPEOUT 

CLEAR ERROR BITS IN SRO AND LEAVE 

TRIED TO READ NON-RESIDENT PAGE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

A 'MOP" = 000240 

PUT PC ft PS OF TRAP ON STACK 



. **•*♦*»•****•**•******••*••*****• ******************* *********** 

West 44 move to previous (user) i-space 

THIS test uses the 'MTPI* INSTRUCTION TO ENSURE THAT THE 
PREVIOUS MODE IS CLOCKED CORRECTLY 

THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED. 



IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 20$. WHERE THE ERRORS ARE REPORTED. 



1$: 



172310 
177610 
172350 
1 77650 
000250 



177776 2$; 



■ **»»**********• ****************************************** ****** 

TST44: SCOPE 



MOV #77406,KIPDR4 

MOV #77406.UIPDR4 

MOV #600,KIPAR4 

MOV #600.UIPAR4 

MOV #20$.MMVEC 



;THE FOLLOWING WILL TEST DSTM=0 MTPI 



KERNEL I-SPACE PAGE 4 READ/WRITE 
USER I-SPACE PAGE 4 READ/WRITE 
MAP KERNEL I PAGE 4 TO 12K 
MAP USER I PAGE 4 TO 12K 
SET M.M. VECTOR TO 20$ 



032260 012737 030340 177776 
032266 012746 000700 
032272 006606 



3$: 



MOV /»030340.PSW 

MOV *7777.-(KSP) 

MTPI USP 

MFPI USP 

MOV (KSP)>-.R1 

CMP *7777. Rl 

BEQ 3$ 

ERROR 50 



MOV *030340.PSW 
MOV #USESTK.-(KSP) 
MTPI USP 



MAKE PREVIOUS MODE USER 

PUSH DATA ON KERNEL STACK 

LOAD USER STACK POINTER 

READ USER STACK POINTER 

POP KERNEL STACK INTO R1 

WAS USER STACK POINTER CHANGED 

BRANCH IF IT WAS 

USER STACK POINTER NOT CHANGED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000764 

MAKE PREVIOUS MODE USER 

GET READY TO RESTORE USER S. POINT 

RESTORE USER STACK POINTER 



cjKDADO KTF11-AA l>t1U DIAG 



CJUDAD.PII 19-DEC-80 


1 1 • n<» 


3664 


032274 






3665 


032274 


012737 




3666 


032302 


012702 


1 nnnnn 


3667 


032306 


012700 




3668 


032312 


010046 




3669 


032314 


105037 


1 7P^i n 


3670 


032320 


006612 




3671 


032322 


112737 




3672 


032330 


011201 




3673 


032332 


020001 




ifolH 


U3c 334 


nm / m 
UU IhU I 




3675 


032336 


104047 




3676 








36^7 








3678 








3679 


032340 






3680 
3681 


032340 


012737 


U JO** 


3682 


032346 


012737 




3683 


C32354 


012700 




368A 


032360 


012702 


1 nnnnn 


3685 


032364 


010046 




3686 


032366 


105037 


1 73710 


3687 


032372 


006612 




3688 


032374 


112737 


000006 


3689 


032402 


013701 


1 00000 


3690 


032406 


020001 




3691 


032410 


001401 




3692 


032412 


104047 




3693 








569A 








3695 








3696 


032414 






3697 


032414 


012737 


07P434 


3698 


032422 


012737 


030340 


3699 


032430 


012700 




3700 


032434 


010046 




3701 


032436 


105037 




3702 


032442 


006637 


1 nnono 


3703 


032446 


112737 


\J\J\J\J\J\J 


3704 


032454 


013701 


1 00000 


3705 


032460 


020001 




3706 


032462 


001401 




3707 


032464 


104047 




3708 








3709 








3710 








371. 


032466 






3712 


032466 


012737 




3713 


032474 


012737 




3714 


032502 


012700 




3715 


032506 


010046 




3716 


032510 


012702 


100002 


3717 


032514 


105037 


172310 


3718 


032520 


006642 




3719 


032522 


112737 


000006 
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T44 MOVE TO PREVIOUS (USER) I-SPACE 



S£0 007? 



001110 



172310 



4$: 



5$: 



001110 
1 7777t 



172310 



6S: 



8$: 



001110 
1 7777b 



172310 



9$: 



10$: 



001110 
y7777t 



172310 



11$: 



12$: 



;^HIS UI 

MOV 

MOV 

MOV 

MOV 

CLR8 

MTPI 

M0V8 

MOV 

CMP 

BEQ 

ERROR 



LL TEST DSTM 

*5$.$LPERR 

*1 00000, R2 

*125252.R0 

RO.-(KSP) 

KIPDR4 

(R2) 

*006,KIPDR4 

(R2).R1 

R0,R1 

6$ 

47 



= 1 MTPI, 



.-THE FOLLOWING WILL TEST 

MOV *8$.$LPERR 

MOV *030340,PSW 

MOV *1 25252. RO 

MOV *1 00000. R2 

MOV RO.-(KSP) 

CLR8 KIPDR4 

MTPI (R2) 

M0V8 *006,KIPDR4 

MOV iWrl 00000. R1 

CMP R0.R1 

BEQ 9$ 
ERROR 47 



.•THIS WILL TEST DSTM 

MOV #10$.$LPERR 

MOV #030340. PSW 

MOV #52525, RO 

MOV RO.-(KSP) 

CLRB KIPDR4 

MTPI aXfl 00000 

M0V8 #006.KIPDR4 

MOV a#1 00000. R1 

CMP RO.Rl 

BEQ 11$ 

ERROR 47 



.-THIS WILL TEST DSTM = 4 

MOV #12$.$LPERR 

MOV #030340, PSW 

MOV #125252, RO 

MOV RO.-(KSP) 

MOV #1 00002, R2 

CLRB KIPDR4 

MTPI -(R2) 

M0V8 #006.KIPDR4 



SET LOOP ON ERROR POINTER TO 5$ 
LOAD VIRTUAL ADDRESS INTO R2 
LOAD TEST DATA INTO RO 
PUSH TEST DATA ON KERNEL STACK 
MAKE KERNEL I PAGE 4 NON-RESIDENT 
LOAD TEST DATA INTO PHYSICAL 60000 
MAKE KERNEL PAGE 4 RESIDENT 
READ FROM ADDRESS 60000 
SEE IF DATA WAS STORED AT CORRECT PLACE 
BRANCH It STORE WAS CORRECT 
INCORRECT STORE 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
■BR 5$" = 000765 
DSTM=2 MTPI. 

SET LOOP ON ERROR POINTER TO 8$ 

MAKE PREVIOUS MODE USER 

LOAD TEST DATA INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

PUSH TEST DATA ON KERNEL STACK 

MAKE KERNEL PAGE 4 NON-RESIDENT 

LOAD TEST DATA INTO PHYSICAL 60000 

MAKE KERNEL PAGE 4 RESISENT 

READ FROM ADDRESS 60000 

SEE IF DATA WAS STORED CORRECTL^' 

BRANCH IF STORE WAS CORRECT 

INCORRECT STORE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 8$" = 000764 

MTPI. 

SET LOOP ON ERROR POINTER TO 10$ 

MAKE PREVIOUS MODE USER 

LOAD TEST DATA INTO RO 

PUSH TEST DATA ON KERNEL STACK 

MAKE KERNEL I PAGE 4 NON-RESIDENT 

LOAD TEST DATA INTO PHYSICAL 60000 

MAKE KERNEL PAGE 4 RESIDENT 

READ FROM ADDRESS 60000 

SEE IF DATA WAS STORED CORRECTLY 

BRANCH IF STORE WAS CORRECT 

INCORRECT STORE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 10$" = 000763 

MTPI. 

SET LOOP ON ERROR POINTER TO 12$ 
MAKE PREVIOUS MODE USER 
LOAD TEST DATA INTO RO 
PUSH TEST DATA ON KERNEL STACK 
LOAD VIRTUAL ADDRESS INTO R2 
MAKE KERNEL I PAGE 4 NON-RESIDENT 
LOAD TEST DATA INTO PHYSICAL 60000 
MAKE KERNEL PAGE 4 RESIDENT 
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of Of 
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w 1 c r Or 


1 00000 
1 wwwww 


001 ?0? 
WW I CWC 


77AA 
Or Oo 










^769 


032726 


01 2702 


001 202 




3770 


032732 


010046 






3771 


032734 


105037 


172310 




3772 


032740 


006672 


000000 




3773 


032744 


112737 


000006 


172310 


3774 


032752 


013701 


100000 




3775 


032756 


020001 
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T44 MOVE TO PREVIOUS (USER) I-SPACE 

MOV aff100000,R1 .-READ FROM ADDRESS 60000 
CMP RO-RI ;SEE IF DATA WAS STORED CORRECTLY 

BEQ 13$ .-BRANCH IF STORE UAS CORRECT 

ERROR 47 .-INCORRECT STORE 

.-FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
.-•BR 12$" = 000762 
;THE FOLLOWING WILL TEST DSTM=5 MTPI . 



SEO 0073 



13$: 



14$: 



15$: 



16$: 



17$: 



18$: 



MOV *1 '.$,$LPERR 

MOV *030340.PSW 

MOV #52525. RO 

MOV *<$TMP2*2>.R2 

MOV *1 00000. $TMP2 

MOV RO.-(KSP) 

CLR8 KIPDR4 

MTPI a-(R2) 

MOVB #006.KIPDR4 

MOV a#l 00000. Rl 

CMP R0.R1 

BEQ 15$ 

ERROR 47 



.-THIS WILL TEST DSTM = 



.-SET LOOP ON ERROR POINTER TO 14$ 
.-MAKE PREVIOUS MODE USER 
.-LOAD TEST DATA INTO RO 
.-LOAD ADDR. OF LOC. $TMP2+2 INTO R2 
.■LOAD VIRT. ADDR. OF TEST LOC. INTO $TMP2 
.•PUSH TEST DATA ON KERNEL STACK 
.MAKE KERNEL PAGE 4 NON-RESIDENT 
.-LOAD TEST DATA INTO PHYSICAL 60000 
.-MAKE KERNEL PAGE 4 RESIDENT 
.-READ FROM ADDRESS 60000 
.-SEE IF DATA WAS STORED CORRECTLY 
.•BRANCH IF STORE WAS CORRECT 
.•INCORRECT STORE 
.-FOR TIGHTER SCOPE LOOP 
.•REPLACE ERROR CALL WITH 
.-'BR 14$'" = 000764 
6 MTPI. 



MOV 

MOV 

MOV 

CLR 

MOV 

CLR8 

MTPI 

MOVB 

MOV 

CMP 

BEQ 

ERROR 



*16$.$LPERR 
#030340. PSW 
#52525. RO 
R2 

RO,-(KSP) 

KIPDR4 

100000<R2) 

#006.KIPDR4 

S#l 00000. R1 

R0.R1 

17$ 

47 



;THE FOLLOWING WILL 



.-SET LOOP ON ERROR POINTER TO 16$ 
;MAKE PREVIOUS MODE USER 
;LOAD TEST DATA INTO RO 
.-MAKE REGISTER 2 ZERO 
.-PUSH TEST DATA ON KERNEL STACK 
.-MAKE KERNEL I PAGE 4 NON-RESIDENT 
.-LOAD TEST DATA INTO PHYSICAL 60000 
.•MAKE KERNEL PAGE 4 RESIDENT 
.-READ FROM ADDRESS 60000 
.-SEE IF DATA WAS STORED CORRECTLY 
;8RANCH IF STORE WAS CORRECT 
.-INCORRECT STORE 
;FOR TIGHTER SCOPE LOOP 
.-REPLACE ERROR CALL WITH 
.-'BR 16$" = 000763 
TEST DSTM=7 MTPI. 



MOV #18$,$LPERR 

MOV #030340, PSW 

MOV #1 25252, RO 

MOV #1 00000, $TMP2 

MOV #$TMP2,R2 

MOV RO,-(KSP) 

CLR8 KIPDR4 

MTPI aO(R2) 

MOVB #006.KIPDR4 

MOV a#1 00000, R1 

CMP R0.R1 



;SET LOOP ON ERROR POINTER TO 18$ 

.-MAKE PREVIOUS MODE USER 

.-LOAD TEST DATA INTO RO 

.-LOAD VIRT. ADDR. OF TEST LOCATION 

.-INTO LOCATION $TMP2 

.•LOAD ADDRESS OF $TMP2 INTO R2 

.-PUSH TEST DATA ON KERNEL STACK 

.•MAKE KERNEL PAGE 4 NON-RESIDENT 

.-LOAD TEST DATA INTO PHYSICAL 60000 

;MAKE KERNEL PAGE 4 RESIDENT 

.READ FROM ADDRESS 60000 

.•SEE IF DATA WAS STORED CORRECTLY 



CJKDADO KTF11-AA mj D1A6 
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T44 MOVE TO PREVIOUS (USER) I-SPACE 



SEO 0074 



3776 

3777 

3778 

3779 

3780 

3781 

3782 

3783 

378A 

3785 

3786 

3787 

3788 

3789 

3790 

3791 

3792 

3793 

379A 

3795 

3796 

3797 

3798 

3799 

3800 

3801 

3802 

3803 

3804 

3805 

3806 

3807 

3808 

3809 

3810 

3811 

3812 

3813 

3814 

3815 

3816 

3817 

3818 

3819 

3820 

3821 

3822 

3823 

3824 

3825 

3826 

3827 

3828 

3829 

3830 

3831 



032760 
032762 



032764 
032772 
033000 



033002 
033006 
033012 
033020 
033026 
033034 



C33036 
033042 
033046 



033050 
033052 

033056 
033062 
033066 
033070 
033072 
033100 
033106 
033114 
033122 
033130 
033134 
033140 



033144 
033152 



001401 
104047 



012737 
012737 
000423 



012637 
012637 
013737 
013737 
042737 
104051 



013746 
013746 
000002 



000004 
012700 

012702 

012701 

010021 

077202 

012737 

012737 

012737 

012737 

012737 

012700 

010037 

012702 



012737 
105037 



032172 001110 
002150 000250 



001266 
001270 

177572 001272 

177576 001274 

160000 1775'2 



0C1270 
001266 



BEQ 19$ 
ERROR 47 



19$: MOV *1$.$LPERR 

MOV *MGMERR.MMVEC 
BR TST45 



20$: MOV (KSP)*.TRAPPC 

MOV (KSP)*.TRAPPS 

MOV SRO.WASSRO 

MOV SR2,WASSR2 

BIC #1 60000, SRO 

ERROR 51 



MOV TRAPPS.-(KSP) 
MOV TRAPPC.-(ICSP) 
RTI 



BRANCH IF STORE WAS CORRECT 

INCORRECT STORE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 18$" = 000763 

SET LOOP POINTER TO START OF TEST 

RESTORE M.M. VECTOR TO NORMAL ROUTINE 

.•BRANCH TO NEXT TEST 



SAVE PC £ PS OF TRAP 

SAVE SRO FOR ERROR TYPEOUT 
SAVE SR2 FOR ERROR TYPEOUT 
CLEAR ERROR BITS IN SRO 
TRIED TO LOAD A N.R. PAGE 4 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
A 'MOP" = 000240 
PUT PC t PS OF TRAP ON STACK 



RETURN TO TEST 



• »»*»***•»••»••**»»»*•»»»»»**♦***••••****•******•*••*•*****•*•** 

'•TEST 45 MOVE FROM PREVIOUS (KERNED I-SPACE TO USER MODE 

THIS TEST CHECKS THAT IF THE PREVIOUS MODE IS KERNEL THE 

• FETCH IS FROM KERNEL SPACE. 

THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED. 

* 

• IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 

• WILL OCCUR AND TRAP TO 21$. WHERE THE ERRORS ARE REPORTED. 

.•«»»»*******••♦»•***•**»♦»♦*•••••••••**•*«*****••♦••••*•*••***•* 

MAKE ALL USER I-SPACE PAGES RESIDENT 
READ/WRITE. LENGTH 200 BLOCKS 
SET LOOP COUNTER TO 8 
LOAD ADDRESS OF FIRST PDR IN R1 
LOAD PDR WITH 77406 
LOOP UNTIL 8 USER PDRS LOADED 
SET LOOP ON ERROR TO 3$ 
GO TO USER MODE FOR THIS TEST 
KERNEL I-SPACE PAGE 4 READ/WRITE 
MAP KERNEL I PAGE 4 TO 12K 
MAP USER I PAGE 4 TO 12K 
LOAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHV 60000 
LOAD VIRTUAL ADDRESS INTO R2 
r DSTM=0 MFPI 

;SET M.M. VECTOR TO 21$ 
;MAKE USER I-SPACE PAGE 4 NON-RESIDENT 







TST45: 


SCOPE 




077406 




1$: 


MOV 


#77406. RO 


000010 






MOV 


*10.R2 


177600 






MOV 


#UIPDR0.R1 






2$: 


MOV 


R0,(R1)* 








SOB 


R2,2$ 


0331 OC 


001110 




MOV 


*3$.$LPERR 


140340 


177776 


3$: 


MOV 


*1 40340. PSW 


077406 


172310 




MOV 


#77406,KIPDR4 


000600 


172350 




MOV 


*600,KIPAR4 


000600 


177650 




MOV 


#600,UIPAR4 


036514 






MOV 


#3651 4. RO 


100000 






MOV 


R0,a#1 00000 


100000 






MOV 


#1 00000. R2 






.-THE 


FOLLOWING WILL T 


033546 


000250 




MOV 


#21$,MMVEC 


177610 






CLR8 


UIPDR4 



CJKDADO KTF11-AA mj DMG 
rjKDAD.PII 19-DEC-80 11:05 



NACYll 30A(10 
U5 





055156 


A1 0777 


1 / AT/ A 

l*»03*»0 


TOW 

5855 


ATTi ^y 

053i6h 


006)06 




585*1 


ATTI 

055166 


A0^7Aik 
\jdCf\JO 


AAA7AA 
000 ^00 


5855 


ATTI 70 
0351 fd 


AA1 y A7 

OOIhO/^ 




5856 


ATTI 7/ 
0531 f** 


A1 O^AA 

01^600 




585?^ 


ATTI 7^ 
0531 fO 


A1 07A1 

Olc/^01 


AA1 1 AA 

001 100 


5858 


A770A0 
033^0£ 


AOAAA1 
OfOOOl 




5859 


rt7TOA/ 

035<:0<i 


A/<1 / A7 

0vl403 




Toy r\ 


ATT^A^ 

053cU6 


1 r\L A/ A 

10*>0*»6 




5o*»l 








70/ ^ 

58^e 








Toy 7 








Toy y 


055£lO 


000*»01 




Toy c 
58h5 


A7701 O 

U33cl£ 


1 0h030 




5ohd 








TO/ 7 








5o*»o 








Tfly Q 

5o*»y 


033^1*1 








A7701 / 

033^ l*» 


A1 9777 

01 C.I if 


A77555 


5oDl 




A1 0777 


1 Z.A7Z.A 




A7757n 
033^30 


A1 57AA 
0 1 ct\)\) 




3035 


A7757A 
033^ 3«t 


A1 57A5 

0 1 cfyjc 


1 AAAAA 




r>770z.n 

U33chU 


UU07 1 £ 






KJJJC'tC 


A1 5AA1 




TfiCA 


033c»»»» 


A 9 AAA 1 






033<:h6 


AA1 AA1 




5o^o 


A770<n 

U33c>U 














5ooU 








3ool 










{JjJCJC 






5oo5 


U33c JC 


A1 5777 


A77PAA 


3oo*i 


A775AA 
U 33^00 


A1 5777 


1 An7in 

1 hU J"* w 


JoO J 


U33cOO 


A1 57A5 


1 nnnnn 

1 WvVv 


3000 


n77575 
yJjJCf c 


nAA^55 






U33c 






3000 


n7757A 
U33c ^0 






7BAO 
JOOV 


A777Ar> 
U333U J 


AA1 AA1 






A777nD 
U3330e 


1 AAAAA 
1 UhUhO 




7B71 
















7fl77 

3or 3 








7B7Z, 


U333U*» 






7B7C 

3or 3 


0333U*> 


ni 5777 


A7771 5 


7fi7& 

3of O 


A7771 5 


A1 5777 




7fl77 

3of f 


U333cv 


UU05 


1 nnnnn 




n777DZ 
0333*: *# 


A1 5AA1 




7B7Q 


n7775A 


A 5 AAA 1 




7BBD 

3ooU 


A7777n 
U3333U 


AA1 AA1 




JOO 1 








3882 








3883 








388A 








3885 


03333A 






3886 


033334 


012737 


033342 


3887 


0333A2 


012737 


140340 



1 77776 



4S: 



001110 
1 77776 



5$: 



6$: 
7$: 



001110 
y7777b 



8$: 
9$: 



001110 
M777b 



10$: 
11$: 



001110 
\7777t 



12$: 
13$: 



K 6 

) 14-JAN-81 11:36 PAGE 75 

MOVE FROM PHEVIOUS (KERNEL) 1 -SPACE TO USER MODE 



SEO 0075 



MOV 

HFPI 

CMP 

BEO 

MOV 

MOV 

CMP 

BEO 

ERROR 



BR 

ERROR 



#1 40340. PSU 
KSP 

#USESTK,USP 
5$ 

(USF)*,RO 

*KERSTK,R1 

R0.R1 

6$ 

46 



6$ 

50 



;THE FOLLOWING WILL TEST 



MOV 
MOV 
MOV 
MOV 
MFPI 
MOV 
CMP 
BEO 
ERROR 



*7$,$LPERR 
*1 40340, PSW 
*36514.R0 
*1 00000. R2 
(R2) 

(USP)*,R1 

R0,R1 

8$ 

46 



;THE FOLLOWING WILL TEST 



MOV 
MOV 
MOV 
MFPI 
MOV 
CMP 
BEO 
ERROR 



*9$.$LPERR 
#140340, PSW 
/fi 00000, R2 
(R2) + 
(USP)*.R1 
R0.R1 
10$ 
46 



;THE FOLLOWING WILL TEST 



MOV 
MOV 
MFPI 
MOV 
CMP 
BEO 
ERROR 



#11$.$LPERR 
/r140540,PSW 
axri 00000 
(USP)+.R1 
R0.R1 
12$ 
46 



;THE FOLLOWING WILL 
MOV #13$,$LPERR 
MOV *140340.PSW 



TEST 



MAKE PREVIOUS MODE KERNEL PRESENT USER 

PUT KERNEL STACK POINTER ON USER STACK 

WAS SOMETHING PUSHED ON STACK AT 1$ 

BRANCH IF NOTHING WAS PUSHED 

POP USER STACK INTO RO 

EXPECTING 1100 AS KSP 

DID YOU GET THE RIGHT POINTER? 

BRANCH IF YOU DID 

WRONG THING WAS PUSHED ON STACK 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 4$" = 000766 

BRANCH TO NEXT TRY 

NOTHING PUSHED ON STACK 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 4$'^ = 000764 

DSTM=1 MFPI. 

SET LOOP ON ERROR POINTER TO 7$ 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

LOAD DATA EXPECTED INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

READ FROM PHYSICAL 60000 

POP USER STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•8R 7V = 000764 

DSM=2 MFPI. 

SET LOOP ON ERROR POINTER TO 9$ 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

LOAD VIRTUAL ADDRESS INTO R2 

EAD FROM PHYSICAL 60000 
POP USER STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
VMONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 9$" = 000766 
DSTM=3 MFPI. 

SET LOOP 0^J ERROR POINTER TO 11$ 

MAKE PREVIOUS MODE KERNEL PRESENT USER 

READ FROM PHYSICAL 60000 

POP USER STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 11$" = 000767 

DSTM=4 MFPI. 

SET LOOP ON ERROR POINTER TO 13$ 

MAKE PREVIOUS MODE DERNEL PRESENT USER 



CjKDADO KTfll-AA MMU DIAG 
rjKDAD.PII 19-DEC-80 11:05 



TOOD 


055550 


Ai '^7A'5 

0 i^^Oc 


1 AAAAO 
1 0000 


5oo9 


035554 


006542 




3890 


055556 


A 1 AI 

012601 




5891 


A77T^ A 

055560 


A'^AAAi 

020001 




3892 


033362 


AAI / Ai 

00 ImO 1 




3895 


033564 


1 04046 




3894 








3895 








3896 








3897 


A7TT^X 

033566 






5898 








5899 


A777^^ 

055566 


A1 07T7 


ATTT7/ 

0333^4 


5900 


0555^4 


AI 0777 


1 / A7Z. A 
1 '»03*tO 


5901 


ATT/ AO 

05340c 


AI 0777 


1 f\r\f\f\r\ 
1 \j\)\j\j\J 


5902 


ATT/ 1 A 

053410 


A1 07rt5 


AA1 OA/ 

OU 1 cUh 


5905 


ATTy i / 
055414 


00655c 




590A 


ATT/ 1 ^ 

055416 


AI OAAI 

01<:601 




5905 


ATT/ OA 

0554<:0 


A0AAA1 
OcOOO 1 




5906 


ATT/ "^O 

0534 4? 


AA1 / AI 

001 401 




5907 


ATT/ "5/ 

C55424 


1 A/ A/ ^ 

1 04046 




5908 








5909 








5910 








591 1 


ATT/ 

0554 <:6 






591*: 








591 5 


ATT/ 

0534<:6 


A1 0777 


A77/ 7A 
033h 3h 


591 ^ 


ATT/ T/ 

0354 34 


A1 5777 


1 «»U3*»U 


591 3 


ATT/ / 5 

0334*1^ 


AACAAO 

0U5U0c 




59 fO 


ATT/ / / 
033HHH 


0065OC 


1 AAAAA 


591 r 


ATT/ CA 

033450 


AI OiLAI 

0 icoO 1 




5910 


ATTA^ 5 
033*»5^ 


A5nnni 




5919 


ATT/ C/ 

035454 


AA1 / AI 

OOIhO I 




5920 


ATT/ 

053456 


1 A/ A/ iL. 

1 040hO 




5921 








yrcc 








5925 








59^^ 


ATT/ AA 

053460 














59i:6 


ATT/ ^A 

0534oO 


A1 5777 


A77/.AA 
033HOO 


yy cf 


ATT/ 

033466 


A1 5777 


1 / A7/. A 


5928 


ATT/ 7/ 

0334 /*» 


AI 5777 


1 OUUUO 


3929 


ATTCA5 

U3350c 


AI 57A5 
0 1 C ' Oc 


AAI OAT 

UO 1 cue 


5950 


ATTCAiL. 

053506 


AAZ. C75 

0065 r c 


UUOUUO 


7QT1 

5951 


ATTCi "5 

05351c 


AI OAAi 

01c601 




7Q70 

5952 


ATTCI / 

055514 


AOAAA1 

OcOOOl 




7077 

3955 


ATTCIi^ 

055516 


AA1 / AI 

001401 




59 3A 


ATTCOA 

0535cO 


1 OhUhO 




5935 








39 So 
















3938 


033522 


012737 


002150 


3939 


033530 


012737 


000340 


39«0 


033536 


012737 


033052 


39A1 


033544 


000423 




39A2 








39A5 









L 6 

MACY11 30A{1052) U-JAN-81 11:36 PAGE 76 

T45 MOVE FROM PREVIOUS (KERNED I-SPACE TO USER MODE 



SfO 0076 



001110 
177776 
001202 



US: 
15$: 



001110 
177776 



16$: 
17$: 



001110 
177776 
001202 



18$: 
19$: 



000250 
177776 

con 10 



20$: 



MOV 

MFPI 

MOV 

CMP 

BEQ 

ERROR 



#1 00002. R2 

-(R2) 

(USP)*,R1 

RO.Rl 

14$ 

46 



;THE FOLLO«liNG WILL TEST 



LOAD VIRTUAL ADDRESS INTO R2 

READ FROM PHYSICAL 60000 

POP USER STACK INTO Rl 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

■19R 13$" = 000766 

DSTM=5 MFPI. 



SET LOOP ON ERROR POINTER TO 15$ 
MAKE PREVIOUS MODE KERNEL PRESENT USER 
LOAD TEST LOG. VIRT. ADDR INTO LOC. $TMP? 
LOAD ADDRESS OF $TMP2*2 INTO R2 
READ FROM PHYSICAL 60000 
POP USER STACK INTO Rl 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA FETCHED 
WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
:-'BR 15$" = 000763 
.-THE FOLLOWING WILL TEST DSTM=6 MFPI. 



MOV 
MOV 
MOV 
MOV 
MFPI 
MOV 
CMP 
BEQ 
ERROR 



/(rl5$,$LPERR 

/(fU0540.PSW 

*1 00000. $TMP2 

*<$TMP2*2>,R2 

a-(R2) 

{USP)*,R1 

RO.Rl 

16$ 

46 



MOV 

MOV 

CLR 

MFPI 

MOV 

CMP 

BEQ 

ERROR 



*17$,$LPERR 
*140540.PSW 
R2 

1 00000 (R2) 

(USP)+.R1 

RO.Rl 

18$ 

46 



.-THE FOLLOWING WILL TEST 

MOV *19$.$LPERR 

MOV #1 40540. PSW 

MOV *1 00000. $TMP2 

MOV iir$TMP2.R2 

MFPI aO(R2) 

MOV (USP)+.R1 

CMP RO.Rl 

BEQ 20$ 

ERROR 46 



MOV *MGMERR.MMVEC 

MOV /(f00340.PSW 

MOV *1$.$LPERR 

BR TST46 



SET LOOP ON ERROR POINTER TO 17$. 

MAKE PREVIOUS MODE KERNEl PRESENT USER 

MAKE REGISTER 2 A ZERO 

READ FROM PHYSICAL 60000 

POP USER STACK INTO Rl 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA FETCHED 

WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 17$" = 000766 

DSTM=7 MFPI. 

SET LOOP ON ERROR POINTER TO 19$ 
MAKE PREVIOUS MODE KERNEL PRESENT USER 
LOAD TEST LOC. VIRT. ADDR. INTO $TMP2 
LOAD ADDRESS OF $TMP2 INTO R2 
READ FROM PHYSICAL 60000 
POP USER STACK INTO Rl 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA FETCHED 
WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 19$" = 000762 
SET M.M. VECTOR TO NORMAL ROUTINE 
GO BACK TO KERNEL MODE, PREVIOUS KERNEL 
SET LOOP POINTER TO START OF TEST 
BRANCH TO NEXT TEXT 



JKDADO Kim-AA MMU DIAG 
JtCDAD.Pn 19-DEC-80 11:05 



M 6 

MACY11 50A(1052) U-jAN-81 11:36 PAGE 77 

T45 MOVE FROM PREVIOUS (KERNEL) I-SPACE TO USER MODE 



SEO 0077 



39A4 


033546 


012637 


001266 




39A5 


033552 


012637 


001270 




3946 


033556 


013737 


177572 


001272 


3947 


033564 


013737 


177S76 


001274 


3948 


033572 


042737 


160000 


177572 


3949 


033600 


104051 






3950 










3951 










3952 










3953 


033602 


013746 


001270 




3954 


033606 


013746 


001 266 




3955 


033612 


000002 






3956 










3957 










3958 










3959 










3960 










3961 










3962 










3963 










3964 










3965 


033614 


000004 






3966 


033616 


012737 


030340 


1 ^^^^^ 

1 77776 


3967 


033624 


106506 






3968 










3969 


033626 


022706 


001 100 




3970 


033632 


001407 






3971 


033634 


012600 






3972 


033636 


012701 


AAA ^A A 

000 70C 




3973 


033642 


020001 






3974 


033644 


001403 






3975 


033646 


104053 






3976 










3977 










3978 










3979 


033650 


000401 






3980 


033652 


104054 






3981 










3982 










3983 
3984 


033654 


012737 


033662 


001 110 


3985 


033662 


012746 


007777 




3986 


033666 


1 06606 






3987 


033670 


106506 






3988 


033672 


012601 






3989 


033674 


022701 


007777 




3990 


033700 


001401 






3991 


033702 


104054 






3992 










3993 










3994 










3995 


033704 


01 2746 


000700 




3996 


033710 


106606 






3997 


033712 


012737 


033616 


001110 


5998 










3999 











21$: MUV (KSP)*.TRAPPC 

MOV (KSP)*.TRAPPS 

MOV SRO.WASSRO 

MOV SR2.WASSR2 

BIC #160000, SRO 

ERROR 51 



MOV TRAPPS.-(KSP) 
MOV TRAPPC,-(KSP) 
RTI 



SAVE PC t PS OF TRAP 

SAVE SRO FOR ERROR TiTPEOUT 

SAVE SR2 FOR ERROR TYPEOUT 

CLEAR ERROR BITS IN SRO 

TRIED TO READ NON-RESIDENT PAGE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

A "NOP" = 000240 

PUT PC I PS OF TRAP ON STACK 

RETURN TO TEST 



*TEST 46 



MOVE FROM/TO D-SPACE " MOVE FROM/TO I-SPACE 



THIS TEST CHECKS THAT SINCE THERE IS NO DISTINCTION 
BETWEEN INSTRUCTION AND DATA SPACE IN THE F0N2-11 
MFPD & MTPD SHOULD BE DECODED THE SAME AS MFPI I MTPI 



TST46: 
1$: 



2$: 



4$: 



5$; 



SCOPE 

MOV *030340,PSW 

MFPD USP 

CMP *KERSTK,KSP 

BEQ 2$ 

MOV (KSP)+.RO 

MOV *USESTK,R1 

CMP RO.RI 

BEQ 3$ 

ERROR 53 



BR 3$ 
ERROR 54 



MOV #4$,$LPERR 

MOV #7777. -(KSP) 

MTPD USP 

MFPD USP 

MOV (KSP)*.R1 

CMP #7777. R1 

BEQ 5$ 

ERROR 54 



MOV #USESTK,-(KSP) 

MTPD USP 

MOV #1$,$LPERR 



MAKE PREVIOUS MODE=USER,CURRENT=KERNEL 

MFPD SHOULD ACT LIKE MFPI PUTTING 

USER STACK POINTER ON THE KERNEL STACK 

WAS SOMETHING PUSHED ON KERNEL STACK? 

BRANCH IF NO 

POP KERNEL STACK INTO RO 

EXPECTING TO GET 700 AS USP 

DID GET RIGHT POINTER VALUE? 

BRANCH IF YFS 

WRONG THING WAS PUSHED ON STACK 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'8R 1$" = 000763 

BRANCH TO NEXT TRY 

NOTHING PUSHED ON STACK 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 1$" = 000761 

SET LOOP ON ERROR POINTER TO 4$ 

PUSH DATA ON KERNEL STACK 

LOAD THE USER STACK POINTER 

READ USER STACK POINTER 

POP KERNEL STACK INTO R1 

WAS USER STACK POINTER CHANGED? 

BRANCH IF YES 

USER STACK POINTER NOT CHANGED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'8R 4$" = 000767 

GET READY TO RESTORE USER STK. PTR. 

RESTORE USER STACK POINTER 

SET LOOP POINTER TO START OF TEST 



CJKDADO KTF11-AA MMU DIAG 
rjKDAD.Pn 19-DEC-80 11:05 



N 6 

MACY11 30A(1052) U-JAN-81 11:36 PAGE 78 

T47 MOVE FROM PREVIOUS I=SPACE (PREVI0US=CURRENT-KERNEL ) 



SEO 0078 



AOOO 








4001 








4002 








4005 








4004 








4005 








4006 








4007 








4008 


033720 


000004 




4009 


033722 


005037 


1 7777t 


4010 


033726 


012700 


001100 


4011 


033732 


010006 




4012 


033734 


006506 




4013 








4014 


033736 


011601 




4015 


033740 


020001 




4016 








4017 


03374? 


001401 




4018 


033744 


104046 




4019 








4020 








4021 








4022 


033746 


005740 




4023 


033750 


020600 




4024 


033752 


001401 




4025 


033754 


104050 




4026 








4027 








4028 








4029 


033756 


012706 


001100 



TEST 47 



TST47: 
1$: 



2$: 



MOVE FROM PREVIOUS 1=SPACE (PREVlOUS=CURRENT-KERNEL) 



THIS TEST CHECKS THAT IF BOTH PREVIOUS AND CURRENT MODES 

ARE KERNEL. AND THE SOURCE MODE IS 0, THE DESTINATION 

STACK IS NOT DECREMENTED BEFORE ACCESS. 

'T1FPI KSP" SHOULD PUSH THE NON-DECREMENTED VALUE 

OF KSP (1100) ONTO THE STACK (AT LOG. 1076). 



SCOPE 

CLR 

MOV 

MOV 

MFPI 

MOV 
CMP 

BEQ 
ERROR 



TST 
CMP 
BEQ 
ERROR 



3$: 



MOV 



a#r-'sw 

*STACK.RO 

RO.KSP 

KSP 

(KSP) ,R1 
R0.R1 

2S 
46 



-(RO) 
KSP,RO 
3$ 
50 



*STACK,KSP 



SET PREVIOUS = CURRENT = KERNEL 

SETUP VALUE FOR STACK POINTER 

LOAD STACK POINTER 

THE VALUE "STACK"' SHOULD BE PUSHED 

BEFORE BEING DECREMENTED 

READ DATA WHICH WAS PUSHED 

WAS THE ORIGINAL VALUE OF THE 

STACK POINTER PUSHED? 

BRANCH IF YES 

MFPI FETCHED WRONG DATA 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR IS" = 000766 

SETUP EXPECTED STACK POINTER VALUE 
WAS THE STACK POINTER DECREMENTED? 
BRANCH IF YES 

STACK NOT PUSHED BY THE MFPI 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 1$" = 000762 
RESTORE STACK POINTER 



L 



03403C 

OA7105 
051523 



013746 001234 



034062 

047524 
051105 
051440 
046040 
052123 
052101 
020040 



013746 001112 



001223 
000042 



034164 



001234 



CJUDAOO KTF11-AA mj DIAG HACYll 
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4050 
4031 
4032 
4033 
4034 
4035 
4036 
4037 
4038 
4039 
40 .0 

4041 033762 

4042 033762 000004 

4043 033764 005037 001102 

4044 033770 005037 001212 

4045 033774 005237 001234 

4046 034000 042737 100000 

4047 034006 005327 

4048 034010 000001 

4049 034012 003110 

4050 034014 012737 

4051 034016 000001 

4052 034020 034010 

4053 034022 104401 

4054 034026 000407 

4055 034030 006412 

4056 034036 040520 

4057 034044 000 

4058 03««046 

4059 034046 

4060 034046 
4061 

4062 034C52 104405 

4063 034054 10440^ 

4064 034060 000425 

4065 034062 035411 

4066 034070 0*^0114 

4067 034076 051522 

4068 034104 042503 

4069 034112 020124 

4070 034120 020124 

4071 034126 030060 
407? 034134 

4073 034134 

4074 034134 
4075 

4076 034140 104405 

4077 034142 104401 

4078 034146 013700 

4079 034152 001411 

4080 034154 005046 

4081 034156 012746 

4082 034162 000442 
4083 

4084 034164 000005 

4085 034166 004710 



30A(1052) 14-JAN-81 11:36 
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79 



S£0 0079 



020104 
021440 



040524 
047522 
0471 1 1 

051501 
051101 
031040 
000 



.S8TTL END OF PASS ROUTINE 



.-•INCREHENf THE PASS NUMBER ($PASS) 
;*TYPE *tND OF PASS #XXXX 

; TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYY' 
.••WHERE XXXX AND YYYY ARE DECIMAL NUMBERS 
.••IF SW12=1 INHIBIT TRACE TRAP 
;«]F THERES A MONjTOR GO TO IT 
.••IF THERE ISN'T JJMP TO LOOP 



$EOP: 



$EOPCT; 



tENDCTi 



65$: 



.EVEN 
64$: 



67$: 



SCOPE 

CLR 

CLR 

INC 

BIC 

DEC 

.WORD 

BGT 

MOV 

.WORD 

$EOPCT 

TYPE 

BR 

,AiCIZ 



MOV 

TYPDS 

TYPE 

BR 

.ASCIZ 



.EVEN 
66$: 



MOV 



TYPDS 
TYPE 
$GET42: MOV 
BEO 
CLR 
MOV 
BR 

$CLR.T: RESET 
$ENDAD: JSR 



$TSTNM 
$TIMES 
$PASS 

*1 00000, $PASS 

(PC)* 

1 

$D0AGN 

(PC)*.a(PC)* 

1 



.-.-ZERO THE TEST NU^BER 
;;ZER0 THE NUMBER OF ITERATIONS 
.-.•INCREMENT THE PASS NUMBER 
;;DON'T ALLOW A NEG. NUMBER 
;;LOOP? 



;;YES ^ 
;; RE STORE 



COUNTER 



.65$ ;;TYPE ASCIZ STRING 

f,4$ ;;GET OVER THE ASCIZ 

<12><15>/END PASS #/ 



$PASS,-(SP) 



.67$ 
66$ 

/ 



;;SAVE $PASS FOR TYPEOUT 
;;TYPE PASS NUMBER 
;;60 TYPE— DECIMAL ASCIZ WITH SIGN 
;;TYPE ASCII STRING 
;;6ET OVER THE ASCIZ 
.•TOTAL ERRORS SINCE LAST START AT 200 / 



$ERTTL.-(SP) 



.$CRLF 
a/!r42,R0 
DOAGIN 
-(SP) 

mLR.T.-(SP) 
$RTRN 



PC.(RO) 



.•SAVE $ERTTL FOR TYPEOUT 

.•TOTAL NL^ER OF ERRORS 

;G0 TYPE— DECIMAL ASCII WITH SIGN 

;TYPE CARRIAGE RETURN. LINE FEED 

;GET MONITOR ADDRESS 

.•BRANCH IF NO MONITOR 

.•INSURE THE 'T" BIT IS CLEAR 

.•SETUP FOR AN RTI OR RTT 

;G0 DO AN RTI OR RTT TO LOAD THE PSW 

;WITH A CLEARED "T" BIT 

.•CLEAR THE WORLD 

.•GO TO MONITOR 



C.KDADO KTF11-AA fWU DIAG 
^JKDAD.PII 19-DEC-80 11:05 



4086 

4087 

4088 

4089 

4090 

4091 

4092 

4093 

4094 

4095 

4096 

4097 

4098 

4099 

4100 

4101 

4102 

4103 

4104 

4105 

4106 

4107 

4108 

4109 

4110 

4111 

4112 

4113 

4114 

4115 

4116 

4117 

4118 

4119 

4120 

4121 

4122 

4123 

4124 

4125 

4126 

4127 

4128 

4129 

4130 

4131 

4132 

4133 

4134 

4135 

4136 

4137 

4138 

4139 

4140 

4K1 



034170 
034172 
034174 

054176 
034204 
034212 
034220 
034222 
034226 
034234 
034234 
034236 
034242 
034250 
034252 
034256 
034260 
034264 
0342 70 



034272 
034272 
034274 
034276 
034300 



034304 
034304 
034306 
034314 



000240 
000240 
000240 

013737 
012737 
012737 
000402 
062706 
013737 

104400 
042716 
032777 
001005 
005137 
100402 
052716 
012746 
000002 



0001 37 
020464 
000000 
377 
034304 



104410 
032777 
001114 



034316 000416 



034320 
034324 
034332 
034336 
034342 
034344 
034346 



013746 
012737 
005737 
012637 
000463 
022626 
012637 



l-lACYll 30A(1052) 14-JAN-81 
END OF PASS ROUTINE 

NOP 
NOP 
NOP 



11:36 
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SO 



iEO 008( 



000004 001 1 76 

034222 000004 

000001 164000 

000004 

001176 000004 



000020 

010000 144670 



034276 

000020 
034272 



377 



000 



000004 
034344 
177060 
000004 



000004 



000004 



.-.SAVE ROOM 

;;F0R 

;;Acni 

.-SAVE CONTENTS OF LOCATION 4 
;SET UP VECTOR IN CASE OF TRAP 
.-NOTIFY MULTI-TESTER OF PASS COMPLETE 
;IF NO TRAP DON'T TOUCH STACK 
;RESET STACK IN CASE OF TRAP 
.•RESTORE CONTENTS OF LOACTION 4 

::PUSH OLD PSW and PC ON STACK 
;; CLEAR THE *T' BIT 
;;RUN WITH TRACE TRAP? 
;;8R IF NO 

;;IS IT TIME FOR TRACE TRAP 

;;8R IF NO 

;;SET TRACE TRAP 

;;JUMP TO START OF TEST 

;; RE TURN— THIS IS CHANGED TO 

;;AN "RIV IF "RTT" IS A LEGAL 

;; INSTRUCTION 

;; RE TURN 

;;"T" BIT STATE INDICATOR 
;;NULL CHARACTER STRING 



***************************************************************** 

•iTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 

.-•AND LOAD THE TEST NUMBER ($TSTNM) INTO THE DISPLAY REG. {DISPLAY<7:0>) 

.-•AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<1 5:08> 

.••THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

.••SW14=1 LOOP ON TEST 

;*SW11=1 INHIBIT ITERATIONS 

.••SW09=1 LOOP ON ERROR 

;*SW08=1 LOOP ON TEST IN SWR<7:0> 

;*CALL 

SCOPE ;;SC0PE=I0T 



DOAGIN: 


MOV 


a«4.a/irsTMP0 




MOV 






MOV 


tfl .i^ri 64000 




BR 


2S 


1$: 


ADD 


*4.SP 


2$: 


MOV 


aiy$TMP0,a'y4 


SDOAGN: 








TRAP 






BIC 


#20, (SP) 




BIT 


An9iTi2,aswR 




BNE 


IS 




COM 


STBIT 




BMI 


IS 




BIS 


*20. (SP) 


IS: 


MOV 


*SL00P,-(SP) 


JRTRN: 


RTi 




SLOOP: 








JMP 


a(PC)* 


SRTNAD: 


.WORD 


RESTRT 


STBIT: 


.WORD 


0 


SENULL : 


.BYTE 


-1.-1.0 




.EVEN 




.S8TTL 


SCOPE 


HANDLER ROUTIN 



040000 144624 IS 



SSCOPE : 

CKSWR 

BIT *8IT14,aSWR 

BNE SOVER 

:»»»»»SfARl OF CODE FOR THE XOR 

SXTSTR: BR 6$ 

MOV a*ERRVEC.-(SP) 

MOV *5$,a«RRVEC 

TST aAl 77060 

MOV (SP)*,a#ERRVEC 

BR SSVLAD 

5S: CMP (SP)*.(SP)* 

MOV (SP)*.a*ERRVEC 



TE 

• * 
» » 

9 0 



TEST FOR CHANGE IN SOFT-SWR 
LOOP ON PRESENT TEST? 
YES IF SW14=1 
SI ERffif^Mtt 

IF RUNNING ON THE "XOR" TESTER CHANGE 

THIS INSTRUCTION 10 A "HOP" (NOP=240) 

SAVE THE CONTENTS OF THE ERROR VECTOR 

SET FOR TIMEOUT 

TIME OUT ON XOR? 

RESTORE THE ERROR VECTOR 

GO TO THE NEXT TEST 

CLEAR THE STACK VTER A TIME OUT 

RESTORE THE ERROR VECTOR 



■■JHOADO <Tni-AA mi DIAG 
"JKDAD.Pn 19-DEC-80 11:05 



AU2 
AK3 
4KA 
AK5 
4K6 

^U8 
AU9 
4150 

A152 

4153 

4154 

4155 

4156 

4157 

4158 

4159 

4160 

4161 

4162 

4163 

4164 

4165 

4166 

4167 

4168 

4169 

4170 

4171 

4172 

4173 

4174 

4175 

4176 

4177 

4178 

4179 

4180 

4181 

4182 

4183 

4184 

4185 

4186 

4187 

4188 

4189 

4190 

4191 

4192 

4193 

4194 

4195 

4196 

4197 



054352 
034354 
034354 
034362 
054364 
034372 
034374 
034400 
03' 402 
034410 
034412 
034420 
034422 
034430 
034432 
034436 
034442 
034444 
034452 
0344 54 
034460 
034462 
034466 
034474 
034476 
034504 
034512 
034516 
034524 
034530 
034534 
034540 
034546 
034554 
034560 
034562 



034564 
034564 
034566 
034572 
034576 
034602 



000423 

032777 
001404 
127737 
001465 
105737 
001421 
123737 
101015 
032777 
001404 
013737 
000446 
105037 
005037 
000415 
032777 
001011 
005737 
001406 
005237 
023737 
002024 
012737 
013737 
105237 
113737 
011637 
011637 
005037 
112737 
013777 
013716 
000002 
000200 



104410 
010037 
010137 
010237 
010337 



000400 

144550 

001103 

001115 

001000 

001110 

001103 
001212 
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144556 
001102 



SEO 003' 



001103 
144520 
001106 



004000 144466 



001 234 

001104 
001212 

000001 
034562 
001102 
001102 
001106 
001110 
001214 
000001 
001102 
001106 



001104 

001 104 
001212 

001232 



001115 
144366 



001162 
001164 
001166 
001170 





BR 


7$ 


.•LOOP ON THE PRESENT TEST 


6$::****>»END OF CODE FOR THE XOR 


TESTER***** 




BIT 


«eiT08,9SyR 


.-LOOP ON SPEC. TEST.' 




BEQ 


21 


;8R IF NO 




CMP8 


aSWR.STSTNM 


;0N THE RIGHT TEST? SWR<7:0> 




BEQ 


SOVER 


;8R IF YES 


2%: 


TSTB 


SERFLG 


.HAS AN ERROR OCCURRED? 




BEO 


3$ 


;8R IF NO 




CMP8 


$ERMAX.$ERFLG ; 


.-MAX. ERRORS FOR THIS TEST OCCURRED'' 




BHI 


3$ 


:8R IF NO 




BIT 


«eiT09,aswR 


.•LOOP ON ERROR? 




BEQ 


4$ 


;8R IF NO 


7%: 


MOV 


$LPERR.$LPADR ; 


;SET LOOP ADDRESS TO LAST SCOPE 




BR 


SOVER 




4S: 


CLR8 


SERFLG 


;ZERO THE ERROR FLAG 




CLR 


$TIMES 


.•CLEAR THE NUMBER OF ITERATIONS TO MAKE 




BR 


1$ 


.•ESCAPE TO THE NEXT TEST 


3$: 


BIT 


#8IT11.5)SWR 


.INHIBIT ITERATIONS? 




BNE 


1$ 


;8R IF YES 




TST 


SPASS 


;IF FIRST PASS OF PROGRAM 




BEQ 


IS 


INHIBIT ITERATIONS 




INC 


SICNT 


.•INCREMENT ITERATION COUNT 




CMP 


STIMES.SICNT 


.-CHECK THE NUMBER OF ITERATIONS MADE 




BGE 


SOVER 


;8R IF MORE ITERATION REQUIRED 


IS: 


MOV 


#1. SICNT 


.•REINITIALIZE THE ITERATION '"CLTITER 




MOV 


SMXCNT,STIMES ; 


;SET NUMBER OF ITERATIONS TO DO 


SSVLAD : 


INCe 


STSTNM 


.•COUNT TEST NUMBERS 




M0V8 


STSTNM.STESTN ; 


;SET TEST NUMBER IN APT MAILBOX 




MOV 


(SP),SLPADR 


.-SAVE SCOPE LOOP ADDRESS 




MOV 


(SP).SLPERR 


.-SAVE ERROR LOOP ADDRESS 




CLR 


SE SCAPE 


.•CLEAR THE ESCAPE FROM ERROR ADDRESS 




M0V8 


*1.SERMAX 


.-ONLY ALLOW ONE(I) ERROR ON NEXT TEST 


$OVER: 


MOV 


STSTNM,aDISPLAY ; 


.•DISPLAY TEST NUMBER 




MOV 


SLPADR.(SP) 


.•FUDGE RETURN ADDRESS 




RTI 




•FIXES PS 


JMXCNT : 


200 




•MAX. NUMBER OF ITERATIONS 


.S8TTL 


ERROR 


HANDLER ROUTINE 





**************************************************************** 

iTHlS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT. 
•SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
*AND GO TO ERRTYP ON ERROR 

•THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

*SW15-1 HALT ON ERROR 

•SW13=1 INHIBIT ERROR TYPEOUTS 

♦SW10-1 BELL ON ERROR 

•SW09=1 LOOP ON ERROR 

•CALL 

• ERROR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 



SERROR: 



CKSWR 

MOV 

MOV 

MOV 

MOV 



RO.SREGO 
RI.SREGI 
R2.$REG2 
R3.SREG3 



.■TEST FOR CHANGE IN SOFT-SWR 
SAVE THE CONTENTS OF RO 
SAVE THE CONTENTS OF R1 
SAVE THE CONTENTS OF R2 
SAVE THE CONTENTS OF R3 



CJKDADO KTF11-AA liMU DIAG 
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SEO 008 



4198 


034606 


010437 


001172 


4199 


034612 


010537 


001174 


4200 


034616 


113737 


001102 


4201 


034624 


105237 


001103 


4202 


034630 


001 775 




4203 


034632 


013777 


001102 


4204 


034640 


032777 


002000 


4205 


034646 


001402 




4206 


034650 


104401 


001216 


4207 


034654 


005237 


001112 


4208 


034660 


011637 


001116 


4209 


034664 


162737 


000002 


4210 


0^,672 


117737 


144220 


4211 


034700 


032777 


020000 


4212 


034706 


001004 




4213 


034710 


004737 


035022 


4214 


034714 


104401 


001223 


4215 


034720 






4216 


034720 


122737 


000001 


4217 


C34726 


001007 




421 fc 


034730 


113737 


001114 


4219 


C34736 


004737 


037454 


4220 


034742 


000 




4221 


034743 


000 




4222 


034744 


000777 




4223 


034746 


005777 


144166 


4224 


034752 


100002 




4225 


034754 


000000 




4226 


034756 


104410 




4227 


034760 


032777 


001000 


4228 


034766 


001402 




4229 


034770 


013716 


001110 


4230 


034774 


005737 


001214 


4231 


035000 


001402 




4232 


035002 


013716 


001214 


4233 


035006 






4234 


035006 


022737 


034166 


4235 


035014 


001001 




4236 


035016 


000000 




4237 


035020 






4238 


035020 


000002 




4239 








4240 








4241 








4242 








4243 








4244 








4245 








4246 








4247 








4248 








4249 








4250 








4251 








4252 








425 J 









001262 



144302 
144272 



001116 
001114 
144232 



001246 
034742 



144152 



000042 



SAVE THE CONTENTS OF R4 
SAVE THE CONTENTS OF R5 
SAVE THE TEST NLWBER 

SET THE ERROR FLAG 

DON'T LET THE FLAG GO TO ZERO 

DISPLAY TEST NUMBER AND ERROR FLAG 

8ELL ON ERROR? 

NO - SKIP 

RING BELL 

COUNT THE NUMBER OF ERRORS 

GET ADDRESS OF ERROR INSTRUCTION 

STRIP AND SAVE THE ERROR ITEM CODE 

SKIP TYPEOUT IF SET 

SKIP TYPEOUTS 

GO TO USER ERROR ROUTINE 



RUNNING IN APT MODE 

NO. SKIP APT ERROR REPORT 

SET ITEM NUMBER AS ERROR NUMBER 

REPORT FATAL ERROR TO APT 



APT ERROR LOOP 
HALT ON ERROR 
SKIP If CONTINUE 
HALT ON ERROR! 
TEST FOR CHANGE IN SOFT-SWR 
LOOP ON ERROR SWITCH SET? 
8R IF NO 

FUDGE RETURN FOR LOOPING 
CHECK FOR AN ESCAPE ADDRESS 
8R IF NONE 

FUDGE RETURN ADDRESS FOR ESCAPE 

;ACT-11 AUTO-ACCEPT? 
;8R/WgCH IF NO 
;YES 

; .-RETURN 

.S8TTL ERROR MESSAGE TYPEOUT ROUTrNE 

************************ **************************************** 

WhIS ROUTINE USES THE "ITEM CONTROL BYTE" (JITEMB) TO DETERMINE WHICH 
•ERROR IS TO BE REPORTED. IT THEN OBTAINS. FROM THE "ERROR TABLE" (SERRTB). 
*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 
* 

*NOTES: 

»1) THIS ROUTINE PROVIDES AN AUTOMATIC "CARRIAGE RETURN-LINE FEED" 

FOR "EM", "DH", AND "DT". 
•2) TWO SPACES ARE TYPED AFTER EACH NUMBER FOR "DT" 
•3) FOR $ITEMB=0. JUST THE ERROR PC IS TYPED 
•4) THE AVAILABLE FORMATS FOR TYPING DATA ARE: 

• DF FORMAT 

• 0 TYPE A 6 DIGIT OCTAL NUMBER (FROM 16-81 T BINARVy 





MOV 


R4.$REG4 




MOV 


R5.$REG5 




MOVB 


$TSTNM,TESTNO 


7$: 


INC8 


$ERFLG 




BEQ 


7$ 




MOV 


$TSTNM,aDISPLAY 




BIT 


«8IT10,aSWR 




BEO 


1$ 




TYPE 


,$8ELL 


It: 


INC 


$E.'^TTL 




MOV 


(SP).$ERRPC 




SUB 


#2.$ERRPC 




MOVB 


a$ERRPC,$ITEMB 




BIT 


#8IT13.aSWR 




BNE 


20$ 




JSR 


PC.ERRTYP 




TYPE 


.$CRLF 


20$: 








CMP8 


#APTENV.$ENV 




BNE 


2$ 




M0V8 


$ITEMB.21$ 




JSR 


PC.$ATY4 


21$: 


.BYTE 


0 




.BYTE 


0 


22$: 


BR 


22$ 


2$: 


TST 


aswR 




BPL 


3$ 




HALT 






CKSWR 




3$: 


BIT 


*8IT09.aSWR 




BEO 


4$ 




MOV 


$LPERR.(SP) 


4$: 


TST 


$E SCAPE 




BEQ 


5$ 




MOV 


$E SCAPE. (SP) 


5$: 








CMP 


#$ENDAD.a/V42 




BNE 


6$ 




HALT 




6$: 


RTI 





035(K0 01 3746 



104402 

000471 

005300 

006300 

006300 

006300 

062700 

012037 

001404 

104401 

000000 

104401 

012037 

001404 

104401 

000000 

104401 

010146 

012001 

001441 

012000 

105710 

001003 



013146 
104402 
000425 



121027 
001003 
013146 
104405 
00041 7 



121027 
001003 
013146 
104406 
000411 



001223 
001114 
001116 
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4254 
4255 
4256 
4257 
4258 

4259 035022 

4260 035022 104401 

4261 035026 010046 

4262 035030 005000 

4263 035032 153700 

4264 035036 001004 
4265 
4266 
4267 

4268 035044 

4269 035046 

4270 035050 

4271 035052 

4272 035054 

4273 C35056 

4274 035060 

4275 035064 

4276 035070 

4277 035072 

4278 035074 

4279 035076 

4280 035102 

4281 035106 

4282 035110 

4283 035112 

4284 035114 

4285 035120 

4286 035122 

4287 035124 

4288 035126 

4289 035130 

4290 035132 
4291 
4292 

4293 035134 

4294 035136 

4295 035140 
4296 

4297 

4298 035142 121027 000001 

4299 035146 

4300 035150 

4301 035152 

4302 035154 
4303 
4304 

4305 035156 121027 000002 

4306 035162 

4307 035164 

4308 035166 

4309 035170 
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83 



SEO 0083 



001316 
035074 



001223 
035112 



001223 



ERRTYP: 



1$: 



2$: 
3$: 

4$: 
5$: 

6$: 



1 TYPE A DECIMAL fAfBER WITHOUT LEADING ZEROS 

2 TYPE A 16 DIGIT BINARY NUMBER 

3 TYPE A 6 DIGIT OCTAL NUMBER (FROM 18-fiiT BINARY) 



;"C/vRRIAGE RETURN" t "LINE FEED" 
* SAVE RO 

; PICKUP THE ITEM INDEX 

;IF ITEM NUMBER IS ZERO, JUST 
;TYPE THE PC OF THE ERROR 
;;SAVE SERRPC FOR TYPEOUT 
;; ERROR ADDRESS 

;;G0 TYPE— OCTAL ASCI I (ALL DIGITS) 
;GET OUT 

.•ADJUST THE INDEX SO THAT IT WILL 
WORK FOR THE ERROR TABLE 



;FORM TABLE POINTER 

.•PICKUP 'tRROR MESSAGE" POINTER 

:SKIP TYPEOUT IF NO POINTER 

;TYPE THE 'tRROR MESSAGE" 

.-'tRROR MESSAGE" POINTER GOES HERE 

.•"CARRIAGE RETURN" I "LINE FEED" 

.•PICKUP 'DATA HEADER" POINTER 

;SKIP TYPEOUT IF 0 

;TYPE THE 'DATA HEADER" 

;'DATA HEADER" POINTER GOES HERE 

.•"CARRIAGE RETURN" ft "LINE FEED" 

"SAVE R1 

•PICKUP 'DATA TABLE" POINTER 
;8R IF NO DATA TO BE TYPED 
; PICKUP 'DATA FORMAT" POINTER 
;JS IT FORMAT 0? 
;8R IF NO 



TYPE 


.SCRLF 


MOV 


RO,-(SP) 


CLR 


RO 


BISB 


a;»$ITEMB.RO 


BNE 


1$ 


MOV 


$ERRPC.-(SP 


TYPOC 




BR 


13$ 


DEC 


RO 


ASL 


RO 


ASL 


RO 


ASL 


RO 


ADD 


*$ERRTB,RO 


MOV 


(R0)*.2$ 


BEQ 


3S 


TYPE 




.WORD 


0 


TYPE 


.SCRLF 


MOV 


(R0)*.4$ 


BEQ 


5$ 


TYPE 




.WORD 


0 


TYPE 


.SCRLF 


MOV 


Rl.-(SP) 


MOV 


(R0)*.R1 


BEQ 


12$ 


MOV 


(RO)+.RO 


TST8 


(RO) 


BNE 


7$ 



.••THIS CODE IS FOR OCTAL (16-8IT) FORMAT (DF=0) 

MOV a(Rl)*.-(SP) ;;SAVt J(R1)* FOR TYPEOUT 

TYPOC ;;60 TVPE— OCTAL ASCI I (ALL DIGITS) 

BR 11$ 

.••THIS CODE IS FOR DECIMAL FORMAT (DF=1) 



7$: 



CMP8 
BNE 
MOV 
TYPDS 
BR 



(RO) .*1 
8$ 

a(Ri)+.-(SP) 
11$ 



;JS IT FORMAT 1? 
.•BRANCH IF NO 
.-.•SAVE a(R1)+ FOR TYPEOUT 
;;G0 TYPE— DECIMAL ASCII WITH SIGN 



.••THIS CODE IS FOR BINARY FORMAT (DF=2) 



8$: 



CMP8 
BNE 
MOV 
TYP8N 
BR 



(RO) .»2 
9$ 

a(Rl)*.-(SP) 
11$ 



;IS IT FORMAT 2? 
.•BRANCH IF NO 
;;SAVE a(R1)* FOR TYPEOUT 
;;G0 TYPE— BINARY ASCII 
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ERROR MESSAGE TYPEOUT ROUTINE 



3E0 008A 



43^0 
/,311 
4312 
A313 
A3H 
4315 
4316 
4317 

4318 
4319 
4320 
4321 
4322 
4323 
4324 
4325 
4326 
4327 
4328 
4329 
4330 
433^ 



055172 
035174 
035200 
035204 
035210 
035212 

035214 
035216 
035220 
035224 
035226 

035230 
035232 
035234 
035240 
C35242 



012146 
004737 
062716 
012637 
104401 
000000 

005711 
001404 
104401 
105720 
000740 

012601 
012600 
104401 
000207 
020040 
035246 



040526 
000005 
035212 



035242 



001223 
000 



:«TH1S 



10$: 
11$: 



12$: 
13$: 



14$: 



CODE IS FOR OCTAL (18-8IT) FORMAT (0F=3) 

MOV (R1)+,-(SP) " " ■ " 

JSR PC.$D820 

ADD *5.(SP) 

MOV {SP)*JO$ 
TYPE 

.WORD 0 



TST 

BEQ 

TYPE 

TST8 

BR 

MOV 

MOV 

TYPE 

RTS 

.ASCIZ 

.EVEN 



(P') 
12$ 
.14$ 
(R0) + 
6$ 

(SP)*,R1 
(SP)*.RO 
.SCRLF 
PC 

/ / 



PUT ADDRESS OF FIRST LOC. ON STACK 
CONVERT TWO LOCS. TO AN ASCII STRING 
ONLY NEED 6 CHARACTERS NOT 11 
PUT ADDRESS Of ASCII CHARS. AT 10$ 
TYPE OCTAL VALUE OF 18-61 T BINARY NO. 



IS THERE ANOTHER NUMBER? 
BR IF NO 

TYPE TW0(2) SPACES 

POINT TO NEW 'T)ATA FORMAT' 

LOOP 



RESTORE R1 
RESTORE RO 
"CARRIAGE RETURN' 
RETURN 

TWO (2) SPACES 



i "LINE FEED' 



035246 


033727 


177776 000020 


035254 


00K11 




035256 


013746 


1 7777b 


035262 


011637 


001276 


035266 


042716 


000020 


035272 


012746 


035300 


035276 


000006 




035300 


000207 





CJKDADO KTFU-AA KfW OIAG 
rjKDAD.Pn 19-DEC-80 11:05 



4352 

4353 

4334 

4335 

4336 

4337 

4338 

4339 

4340 

4341 

4342 

4343 

4344 

4345 

4546 

4347 

4548 

4349 

4550 

4351 

4352 

4353 

4354 

4355 

4356 

4557 

4358 

4359 

4360 

4361 

4362 

4365 

4364 

4365 

4366 

4367 

4368 

4369 

4370 

4371 

'♦372 

4373 

4374 

4375 

4376 

4377 

4378 

4379 

4380 

4381 

4382 

4383 

4384 

4385 

4386 

4387 
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SUBROUTINES USED BV THIS PROGRAM 



SEO 0085 



.SerTL ••••• SUBROUTINES USED BV THIS PROGRAM 
.S8TTL TURN OFF T-BJT AND SAVE CURRENT PSW 



THIS SUBROUTINE IS USED TO TURN OFF THE TRACE TRAP BIT IN THE PSW 
IF ir IS ON. THE PROCESSOR STATUS IS SAVED IN "T8ITPS" SO THAT 
THE PSU CAN BE RESTORED TO ITS PREVIOUS CONDITION WHEN CONDITIONS 
WARRANT THBIT TRAPPING. 



035302 
035310 
035312 
035316 
035324 
035330 
035332 



033727 001276 
001410 

013746 001276 
012737 000340 
012746 035332 
U00006 
000207 



035334 
035340 
035344 
035350 
035352 
035356 
035362 
035366 



012702 
012701 
012721 
077203 
012702 
012701 
012721 
077203 



000010 
172300 
}77777 

000010 
172340 
1 77777 



1S: 



BIT 


PSU,#TBIT 


IS THE T-8IT SET IN THE PSU? 


BEG 


IS 


EXIT IF NO 


MOV 


PSW.-(SP) 


PUSH PRESENT PSW ON THE STACK 
ALSO SAVE IT IN **T8ITPS" FOR 
RESTORING LATER 


MOV 


(SP). TBI TPS 


BIC 


#T8IT.(SP) ; 


CLEAR THE T-8IT (BIT 4) IN THE PSW 
PUSH PC OF *7?TS" ON STACK 
•'T^ETURN" TO 1$ WITH TH9IT OFF 


MOV 


#1$,-(SP) 


RTT 




RTS 


PC ; 


•RETURN TO PROGRAM 



S8TTL TURN ON TH3IT AND RESTORE PREVIOUS PSW 



THIS SUBROUTINE IS USED TO RESTORE THE PROCESSOR STATUS TO ITS 
PREVIOUS CONDITION BY RESTORING THE '7-eiT PSW" SAVED BY THE 
■70FF" SUBROUTINE IN THE 'TBITPS" LOCATION. 



'*******•*••********************************»***********••**•••• 



000020 TON: 



001276 



1$: 



BIT 
BEO 
MOV 
MOV 
MOV 
RTT 
RTS 



T81TPS,#TBIT 
1$ 

TBITPS.-(SP) 

*340,TBITPS 

#1$,-(SP) 

PC 



WAS T-an ON IN THE PREVIOUS PSW? 
EXIT IF NO 

PUSH PREVIOUS PSW ON THE STACK 
RESET THE '^BI TPS" LOCATION 
PUSH PC OF "RJ%" ON STACK 
•RETURN" TO 1$ WITH T-8IT RESTORED 
RETURN TO PROGRAM 



.SBTTL SET ALL URITEABLE BITS IN ALL PAR/PDR'S 



* THIS SUBROUTINE IS USED BY THE PAR/PDR DUAL ADDRESSING TEST 

* TO SET ALL URITEABLE BITS IN ALL KERNEL AND USE PAR'S AND 

* PDR'S TO A 1. THE "INITIAL STATE" OF HAVING ALL BITS=1 IS 

* USED TO SEE THAT ONLY ONE REGISTER IS CLEARED IN RESPONSE TO 

* A SINGLE PAR OR PDR ADDRESS. 
• 



SETREG: MOV 
MOV 

1$: MOV 

SOB 
MOV 
MOV 

2$: MOV 
SOB 



<no.R2 

#KJPDR0.R1 

/C-l.(RI)* 

R2.1$ 

*10.R2 

*KIPAR0,R1 

*-1,(R1)+ 

R2.2$ 



LOAD LOOP COUNTER WITH AN 8 

LOAD ADDRESS OF FIRST PDR INTO Rl 

SET BITS IN KERNEL PDR TO 1 

LOOP TO 1$ UNTIL ALL KERNEL PDR'S LOADED 

LOAD LOOP COUNTER WITH AN 8 

LOAD ADDRESS OF FIRST PAR INTO Rl 

SET BITS IN A KERNEL PAR TO 1 

LOOP TO 2$ UNTIL ALL KERNEL PAR'S LOADED 



CJKDADO kTFII- 

rjKOAo.pn 



AA mj DIAG 
19-DEC-80 11:05 
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SET ALL WRITEABLE BITS IN ALL PAR/PDR'S 



SEO 0086 



4388 

4389 

4390 

4391 

4392 

4393 

4394 

4395 

4396 

4397 

4398 

4399 

4400 

4401 

4402 

4403 

4404 

4405 

4406 

4407 

4408 

4409 

4410 

4411 

4412 

4413 

4414 

4415 

4416 

4417 

4418 

4419 

4420 

4421 

4422 

4423 

4424 

4425 

4426 

4427 

4428 

4429 

4430 

4431 

4432 

4433 

4434 

4435 

4436 

4437 

4438 

4439 

4440 

4441 

4442 

4445 



035370 
035374 
035400 
035404 
035406 
035412 
035416 
035422 
035424 



035426 
035426 
035432 
035436 
035442 
035444 
035446 
035450 
035452 
035454 



035456 
035462 
035464 
035470 
035474 
035500 
035502 
035504 
035506 
035510 
035512 



035514 
035520 
035522 
035526 
035532 
035536 
035540 
035542 
035544 



012702 
012701 
012721 
077203 
012702 
012701 
012721 
077203 
000207 



000010 
177600 
M7777 

000010 
1 77640 
^77777 



1 72300 
000010 
077416 



000002 

1 72340 
000010 
\77777 



012701 
012704 
012705 
021105 
001404 
020100 
001402 
011102 
104016 



062701 
077411 
012701 
012704 
012705 
021105 
001404 
020100 
001402 
011102 
104016 



062701 000002 
077411 

012701 177600 

012704 000010 

012705 077416 
021105 
001404 
020100 
001402 



3$; 



4$: 



NOV 
MOV 
MOV 
SOB 
MOV 
MOV 
MOV 
SOB 
RTS 



#10. R2 

#UIPDR0.R1 

#-l.(Rl)* 

R2.3$ 

#10. R2 

#UIPAR0,R1 

#-1,(R1)* 

R2,4S 

PC 



LOAD LOOP COUNTER WITH AN 8 
LOAD ADDRESS Of FIRST PDR INTO R1 
SET BITS IN A USER PDR TO 1 
LOOP TO 3$ UNTIL ALL USER PDR'S LOADED 
LOAD LOOP COUNTER WITH AN 8 
LOAD ADDRESS OF FIRST PAR INTO Rl 
SET BITS IN A USER PAR TO 1 
LOOP TO 4$ UNTIL ALL USER PAR'S LOADED 
; RE TURN TO TEST 



S8TTL READ & COMPARE KERNEL I USER PAR/PDR'S 



THIS SUBROUTINE IS USED BY PAR/PDR DUAL ADDRESSING TEST TO 
READ ALL THE PAR'S AND PDP'S TO SEE THAT ONLY ONE REGISTER 
WAS CLEARED IN RESPONSE TO A SINGLE PAR OR PDR ADDRESS. 
ANY FAILURES FOUND BY THE PAR/PDR DUAL ADDRESSING TEST WILL 
BE REPORTED BY THIS SUBROUTINE. 



CMPREG: 



1$: 



2$: 



3$: 



4$: 



5$: 



MOV 
MOV 
MOV 
CMP 
BEO 
CMP 
BEO 
MOV 
ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 
BEO 
CMP 
BEO 
MOV 
ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 
BEO 
CMP 
BEO 



#K]PDR0.R1 
#10, R4 
#77416. R5 
(R1).R5 
2$ 

Rl ,R0 
2$ 

(R1).R2 
16 



#2.R1 
R4J$ 

#KJPAR0.R1 

#10, R4 

#1 7^777, R5 

(R1),R5 

4S 

R1.R0 
4$ 

(R1),R2 
16 



#2,R1 
R4,3$ 
#UIPDR0,R1 
#10, R4 

#77416,R5 

{R1),R5 

6$ 

R1.R0 
6S 



LOAD ADDRESS OF FIRST KERNEL PDR IN Rl 

LOAD LOOP COUNTER WITH AN 8 

PUT EXPECTED PDR CONTENTS IN R5 

ARE ALL WRITEABLE BITS SET AS EXPECTED? 

BRANCH IF YES 

WAS IT THE REG. THAT WAS CLEARED? 
BRANCH IF YES 

SAVE CONTENTS OF IMPROPERLY CLEARED REGISTER 

A PDR WAS EFFECTED BY CLEARING A DIFFERENT PAR/PDR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

AN "RTS PC" = 000207 

FORM NEXT ADDRESS 

LOOP TO 1$ UNTIL ALL KERNEL PDR'S CHECKED 

LOAD ADDRESS OF FIRST KERNEL PAR IN R' 

LOAD LOOP COUNTER WITH AN 8 

PUT EXPECTED PAR CONTENTS IN R5 

ARE ALL WRITEABLE BITS SET AS EXPECTED? 

BRANCH IF YES 

WAS IT THE REG. THAT WAS CLEARED? 
BRANCH IF YES 

SAVE CONTENTS OF IMPROPERLY CLEARED REGISTER 

A PAR WAS EFFECTED BY CLEARING A DIFFENENT PAR/PDR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

AN PC" = 000207 

FORM NEXT ADDRESS 

LOOP TO 3$ UNTIL ALL KERNEL PAR'S CHECKED 

LOAD ADDRESS OF FIRST USER PDR IN Rl 

LOAD LOOP COUNTER WITH AN 8 

PUT EXPECTED PDR CONTENTS IN '>5 

ARE ALL WRITEABLE BITS SET A. EXPECTED? 

BRANCH IF YES 

WAS IT THE REG. THAT WAS CLEARED? 
BRANCH IF YES 
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011102 
10A016 



062701 000002 
077411 

012701 177640 

012704 000010 

012705 Mill? 
021105 
001404 
020100 
001402 
011102 
104016 



062701 0C0002 

077411 

000207 



rjKDAD.PII 1 


4444 


035546 


4445 


035550 


4446 




4447 




4448 




4449 


035552 


4450 


035556 


4451 


035560 


4452 


035564 


4455 


035570 


4454 


035574 


4455 


035576 


4456 


035600 


4457 


035602 


4458 


035604 


4459 


035606 


4460 




4461 




4462 




4463 


C35610 


4464 


035614 


4465 


035616 


4466 




4467 




4468 




4469 




4470 




4471 




4472 




4473 




4474 




4475 




4476 




4477 




4478 
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READ ft COMPARE KERNEL ft 



J 7 
;36 PAGE 87 
USER PAR/POR'S 



SEO 0087 



6S: 



7$: 



8S: 



MOV 
ERROR 



ADD 
S08 
MOV 
MOV 
MOV 
CMP 
BEG 
CMP 
BEO 
MOV 
ERROR 



ADD 

S08 
RTS 



(R1),R2 
16 



*2.R1 

R4.5$ 

#UIPAF0,R1 

»10,R' 

*177777, r5 

(R1).R5 

8t 

R1 .RO 
8S 

(R1).R2 
16 



*2,R1 
R4.7$ 

PC 



.•SAVE CONTENTS OF IMPROPERLY CLEARED REGISTER 

;A PDR WAS EFFECTED BY CLEARING A DJFFERENT PAR/PDR 

;FOR TIGHTER SCOPE LOOP 

.•REPLACE ERROR CALL WITH 

;AN 'T^TS PC" = 000207 

;FORM NEXT ADDRESS 

;LOOP TO 5$ UNTIL ALL USER PDR'S CHECKED 

;LOAD ADDRESS OF FIRST USER PAR IN R1 

;LOAD LOOP COUNTER WITH AN 8 

;PUT EXPECTED PAR CONTENTS IN R5 

;ARE ALL WRITEABLE BITS SET AS EXPECTED? 

.-BRANCH IF YES 

.WAS IT THE REG. THAT WAS CLEARED? 
.•BRANCH IF YES 

.•SAVE CONTENTS OF IMPROPERLY CLEARED REGISTER 

;A PAR WAS EFFECTED BY CLEARING A DIFFERENT PAR/PDR 

;FOR TIGHTER SCOPE LOOP 

.•REPLACE ERROR CALL WITH 

;AN 'T^TS PC" = 000207 

;FORM NEXT ADDRESS 

;LOOP TO 7$ UNTIL ALL USER PAR'S CHECKED 
.RETURN TO TEST 



S8TTL CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 



THIS SUBROUTINE IS USED TO FORM AN 18-8IT OR 22-eiT PHYSICAL ADDRESS 

(PSA) FROM THE 16-8IT VIRTUAL ADDRESS (VBA) AND THE APPROPRIATE 

PAGE ADDRESS REGISTER (PAR). THE SAME METHOD USED BY THE MEMORY 

MANAGEMENT LOGIC IS USED. VBA <15:13> SELECTS WHICH PAR/PDR 

JS TO BE USED, VBA <5:0>*P8A <5:0>. AND VBA <12:6> IS ADDED 

TO PAR <15:00> TO GIVE P8A <21:6>. BITS <21:16> OF THE 

PHYSICAL ADDRESS ARE LEFT IN LOC. "P8AHI" AND BITS <15:00> 

ARE LEFT IN LOC. 'PaALO". THE PSW'S "CURRENT MODE" BITS 

ARE USED TO SELECT THE KERNEL OR USER PAR/PDR 'S. THE ROUTINE 
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••HO J 








LLtkL. 








'*'*Oj 










nT5*>?n 


010046 




LLK7 




010?46 


172340 


MHOO 




01P70? 






05?737 


140000 






00140? 








01 ?70? 


177640 






01 5700 


001 506 




055650 


07?0?7 


177764 




055654 


04? 700 


1 77761 




055660 


06000? 






05566? 


01 1 POO 






055664 


01000? 




4498 


C55666 


013737 


0C1 306 


4499 


055674 


042737 


160000 


4500 


05570? 


077227 


1 77766 


4S01 


055706 


042702 


177700 


4 SOP 


05571? 


072027 


000006 

WW w 


450? 


055716 


042700 


000077 


4504 


035722 


060037 


001312 


4505 








4506 


055726 


005502 




4507 


055750 


010237 


001314 


4508 


035734 


032737 


000020 


4509 


05574? 


001003 




4510 


035744 


042737 


000074 


4511 


035752 






4512 


035752 


012602 




4513 


035754 


012600 




45U 


035756 


000207 




4515 








4516 
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CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 

• IS ENTERED WITH LOC. 'VIRTV CONTAINING THE 16-8IT VIRTUAL 

• ADDRESS. IF 18-81 T ADDRESSING IS SELECTED JN SR5. THEN 

• P8A<21:18> ARE CLEARED IN "PBAHl". 



itQ 0088 



FORMPA: 



1$: 



2$: 



MOV 


RO,-(SP) 


MOV 


R2.-(SP) 


MOV 


#KiPAR0,R2 


BIT 


*1 40000. PSW 


BEQ 


1$ 


MOV 


*UIPAR0.R2 


MOV 


w f D T 1 on 
VJH I 1 ,RU 


ASH 


*-14,R0 


BIG 


#1 77761.ro 


ADD 


R0.R2 


MOV 


(R2).R0 


MOV 


R0.R2 


MOV 




BIC 


#160000,P8ALO 


ASH 


#-12.R2 


BIC 


#1 77700. R2 


ASH 


#6.R0 


BJC 


#77, RO 


ADD 


R0.P8AL0 


ADC 


R2 


MOV 


R2.P8AHI 


BIT 


#8IT4.SR3 


BNE 


2S 


BIC 


*74.P8AHI 


MOV 


(SP;*.R2 


MOV 


(SP)*.RO 


RTS 


PC 



;PUSH RO ON STACK 
.PUSH R2 ON STACK 

LOAD ADDRESS OF FIRST KERNEL PAR IN R2 
IN USER MODE? 
BRANCH IF NO 

LOAD ADDRESS OF FIRST USER PAR IN R2 

LOAD VIRTUAL ADDR. (VBA) INTO RO 

GET BITS <15:13> DOWN TO BITS <3:1> 

MASK OF ALL BITS BUT BITS <3:1> 

ADD OFFSET TO BASE PAR ADDRESS 

GET BITS <15:00> FROM APPROPRIATE PAR 

COPY PAR BITS <15:00> INTO R2 

PUT VIRTUAL ADDR. IN LOC. "P8AL0" 

CLEAR OFF BITS <15:13> OF ORIGINAL VBA 

GET PAR <15:10> DOWN TO BITS <5:0> OF R2 

CLEAR OFF ALL BITS BUT BITS <5:0> 

SHIFT PAR<9:0> TO <15:6> OF RO 

CLEAR BITS <5:0> OF RO 

IN EFFECT, ADD VBA<12:0> TO PAR<9:0> 

(PAR<9:0> IN BITS <15:6> OF RO) 

ADD ANY CARRY TO R2 

PUT BITS <21:16> OF PHYSICAL ADDR. IN P8AHI 
SEE IF 18 OR 22-61 T ADDRESSING 
BRANCH IF 22-81 T ADDRESSING 
CLEAR BITS <5:2> 

;;POP STACK INTO R2 
;;POP STACK INTO RO 
; RE TURN TO PROGRAM 
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>EQ 0089 



y c 1 7 








/ c i o 
•iJ 10 








/CIA 








A520 
















4522 








4525 








y C O/ 








/ c oc 








/ c 

4o<ro 








43C' 


U33/^00 


A'50777 


AAA1 7iL. 

UUU1 fo 


/ c oa 
4523 


nTC7^A 

033^00 


001 114 




n7C77r\ 
U53r f\j 


1 AC777 


1 y 71 CA 

1 h3 I 3U 


S5 5U 


n7C77Z 


1 AA 111 
1 UU 1 1 1 






n7C 77i» 

U33r 


11 r r«»0 


1 y 71 zz 


453^ 


U3o00c 


A/ 071i» 
U4^f lo 


1 77XAA 


*»55j 


U30VAI0 


AOO?^^ 
UdcfdO 


AAAAA7 

UUUUU' 


y C7/ 
*.53*» 


U3oU1 d 


AA1 1 AO 






U3oU iH 


1 07707 

\ dJf df 


AA1 1 7Z 
UU 1 1 3't 


*»53o 


(^7/:.n'D'D 


AA1 / 7A 




/ QT7 
h5 








<i53o 


U3oU<:*» 


1 Azy ni 
1 U*»*»U 1 


A7A700 
Uior dd 


*»5 3V 


n7An7A 
U30U3U 


1 AZZ A1 
1 UhsU I 


A7A757 

U30f^ df 




U3oU3'» 


A 1 7 7Z A 


AAA1 7A 
UUU 1 ' 0 


y cy 1 
*»5'» 1 


U5oU4U 


1 AZZAO 

1 UmSOc 






U3oU4^ 


1 AZZA1 
1 U*»hU I 


A7A7AA 
U30^'»U 


y 


A7AAZA 


AACAZA 
UU3UHO 




y cy y 
^5»»»» 


A7AACA 
U50U3U 


AACAZA 
UU3UH0 




y Cy c 
*»3'»5 


A7AACD 


1 AC777 
1 U3^ ' ^ 


1 Z 7AAA 
l*»3U00 


y c/ 
H3*tO 


U3oU30 


1 AA77C 




HJH r 








••3*to 


A7AAAA 
U30U0U 


1 1 77ZA 
\ \ f f hO 


1 *»3U0c 


y czQ 

«»5*»y 


A7AAAy 


Ay 071 A 
\JHdi 1 0 


1 77AAA 
1 ' row 


y CCA 
»»55U 








y CC1 
»»3 3 1 


A7AA7A 


M01 A57 
Ut: 1 Oc f 


UUUUU J 


A ceo 


A7AA7Z 


AA1 A1 C 
UU 1 U 1 J 




y CC7 
*»333 


'^7i^A7A 


1 AZZA1 
1 UhhU I 


A7A71 A 

U30^1 U 


y ccz 


A7X1 AO 
U30 lU^ 


UOiT^UO 


AAAAAA 

uuuuoo 


y ccc 
••333 


A7A1 AA 

U3olUo 


1 07707 


AA1 1 7C 
UU 1 1 33 


y ccii 
*»330 


A 7A 1 1 Z 
U30 1 l»» 


AA1 AA7 
UU1 UU3 




y CC7 


A7A1 1 

U3o 1 lo 


A1 0777 


AAA 1 AA 

UUU 1 UU 


y ceo 


A xt. 1 oy 


AAA1 77 


U30f 3c 


y CCQ 








y c<.n 








y CA1 


A7A1 7A 
U30 1 3U 


A01 A07 


AAAAOC 

UUUUc3 


y Cii.5 


n7A1 7z 
U30 1 3*» 


AA1 AAC 
UU IUU3 




y CA7 


A7A1 7A 
U 30 1 30 


1 AZZA1 


A7A71 C 
U30r 1 3 


*»30*» 


n7A1 Z 3 
U30 Ihc 


AAD7AA 
UOcf UO 


AAAAAA 
UUUUUO 


•»3o3 


A7A1 z<. 
U 30 1 hO 


AArt7 r 
UUwf -»f 












4567 








4568 


036150 


021627 


00001 5 


4569 


036154 


001022 




4570 


036156 


005766 


000004 


4571 


036162 


001403 




4572 


036164 


016677 


000002 



.S8TTI TTY INPUT ROUTINE 



.ENABL LSB 



001140 SCKSUR 



000001 



.••SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 
.••ROUTINE IS ENTERED FR'.ifl THE TRAP HANDLER, AND WILL 
.••SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
•WHEN OPERATING IN TTY FLAG MODE. 

;IS THE SOFT-SWR SELECTED? 
.•BRANCH IF NO 
;CHAR THERE? 

;IF NO. DON'T WAIT AROUND 
;SAVE THE CHAR 
.•STRIP-OFF THE ASCII 
;IS IT A CONTROL G? 
;N0. RETURN TO USER 
;ARE WE RUNNING IN AUTO-*IODE? 
.-BRANCH IF YES 



19$: 
7$: 



000001 
143020 



8$: 
9$: 
20$: 

1C$: 



fMP 


/rcupcr: cup 


RMP 
OniC 




T^TR 


W-9 1 r\0 


BPL 


15$ 


MOVB 


a$TKfl,-(Sp; 






cnp 


*7.(SP)* 


BNE 


15$ 








15$ 


TYPF 


tfNTI G 


TYPE 




MOV 


SWRFG -(SP) 


TYPOC 




TYPE 


.$MNEW 


CLR 


-(SP) 


CLR 


-(SP) 


TST8 


a$TKS 


BPL 


7$ 


novB 


a$TK8.-(SP) 


BIC 


**C177.(SP) 


CMP 


(SP).*3 


BNE 


9$ 


TYPE 


,$CNTLC 


ADD 


*6,SP 


CMP8 


$INTAG,*1 


BNE 


8$ 


MOV 


#100,a$TKS 


JMP 


CNTRLC 



142746 



CMP 

BNE 

TYPE 

ADD 

BR 



CMP 
BNE 

TST 
BEO 

MOV 



(SP).#25 
10$ 

.$CNTLU 

*6.SP 

19$ 



(SP).#15 
16$ 
4(SP) 
11$ 

2(SP),aswR 



.•ECHO THE CONTROL-G (*G) 

;TYPE CURRENT CONTENTS 

;SaVE SWREG for TYPE OUT 

;G0 TYPE— OCTAL ASCI I (ALL DIGITS) 

.•PROMPT FOR NEW SWR 

.■CLEAR COUNTER 

;THE NEW SWR 

;CHAR THERE? 

;IF NOT TRY AGAIN 

;;PICK UP CHAR 
;;MAKE IT 7-61 T ASCII 

.-IS IT A CONTROL-C? 
.•BRANCH IF NOT 
•YES, ECHO CONTROL-C (*C) 
•CLEAN UP STACK 

•REENABLE TTY KEYBOARD INTERRUPTS"* 
; BRANCH IF NO 

.•ALLOW TTY KEYBOARD INTERRUPTS 
; CONTROL-C RESTART 



IS IT A CONTROL -U? 
BRANCH IF NOT 
YES. ECHO CONTROL -U ("U) 
IGNORE PREVIOUS INPUT 
LET'S TRY IT AGAIN 



IS IT A <CR>? 
BRANCH IF NO 

YES, IS IT THE FIRST CHAR? 
BRANCH IF YES 
SAVE NEW SWR 
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M 7 

PAGE 



4573 

4574 

4575 

4576 

4577 

4578 

4579 

4580 

4581 

4582 

4583 

458*« 

4585 

4586 

4587 

4588 

4589 

4590 

4591 

4592 

4593 

4594 

4595 

4596 

4597 

4598 

4599 

4600 

4601 

4602 

4603 

4604 

4605 

4606 

4607 

4608 

4609 

4610 

4611 

4612 

4613 

4614 

4615 

4616 

4617 

4618 

4619 

4620 

4621 

4622 

4623 

4624 

4625 

4626 

4627 

4628 



036172 
036176 
036202 
036210 
036212 
036220 
036222 
036226 
036232 
036234 
036240 
036242 
036246 
036252 
036254 
036256 
036260 
036262 
036266 
C36272 
036274 
036300 



036302 
036304 
036312 
036316 
036320 
036326 
036334 
036342 
036344 
036350 
036352 
036356 
036362 
036366 
036370 
036372 
036400 
036402 
036410 
036412 
036420 



062706 
104401 
123727 
001003 
012777 
000002 
004737 
021627 
002420 
021627 
003015 
042726 
005766 
001403 
006316 
006316 
006316 
005266 
056616 
000667 
104401 
000720 



011646 
016666 
105777 
100375 
1 1 7766 
042766 
026627 
001013 
105777 
100375 
1 1 7746 
042716 
022627 
001366 
000750 
026627 
002407 
026627 
003003 
042766 
000002 



90 



;; CLEAR UP STACK 
;;ECH0 <CR> AND <LF> 
;;RE-ENABLE TTY K8D INTERRUPTS? 
; .-BRANCH IF NOT 

;;RE-ENABLE TTY KBD INTERRUPTS 

; .-RETURN 

;;ECHO CHAR 

;;CHAR < 0? 

; .-BRANCH IF YES 

;.-CHAR > 7? 

;; BRANCH IF YES 

STRIP-OFF ASCII 
;;IS THIS THE FIRST CHAR 
.-.-BRANCH IF YES 
;;N0. SHIFT PRESENT 

CHAR OVER TO MAKE 
ROOM FOR NEW ONE. 
.-.•KEEP COUNT OF CHAR 
;;SET IN NEW CHAR 
.-.-GET THE NEXT ONE 
.-.-TYPE ?<CR><LF> 
; .-SIMULATE CONTROL-U 



•**»»»•*»»»*»»*»»*»»*»•»»**»»»**»»»»»»*»*»»*»•»»********»**»»»*** 

'•THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
*CALL: 

• RDCHR ;; INPUT A SINGLE CHARACTER FROM THE TTv 

• RETURN HERE ;; CHARACTER IS ON THE STACK 

• .-.-WITH PARITY BIT STRIPPED OFF 



S£0 0090 



000006 




11$: 


ADD 


#6.SP 


001223 




US: 


TYPE 


.$CRLF 


001135 


000001 




CMP8 


$INTAG,*1 






BNE 


15$ 


000100 


142724 




MOV 


#100.5)$TKS 






15$: 


RTI 




037314 




16$: 


JSR 


PC.$TYPEC 


000060 






CMP 


(SP) .#60 






BLT 


18$ 


000067 






CMP 


(SP) .#67 






BGT 


18$ 


000060 






BIC 


*60, (SP)* 


000002 






TST 


2(SP) 






BEQ 


17$ 








ASL 


(SP) 








ASL 


(SP) 








ASL 


(SP) 


000002 




17$: 


INC 


2(SP) 


177776 






BIS 


••2(SP),(SP) 








BR 


7$ 


001222 




18$: 


TYPE 


.$QUES 








BR 


20$ 






.DSA8L 


LSB 





000004 000002 
142626 

142622 000004 

1 77600 000004 

000004 000023 

142574 

142570 
1 77600 
000021 



000C04 000140 
000004 000175 
OOOO'.O 000004 



$RDCHR: MOV (SP).-(SP) 

MOV 4(SP).2(SP) 

1$: TSTB a$TKS 

BPL 1$ 

MOVB a$TK8,4(SP) 

BIC #-C<177>,4(SP) 

CMP 4(SP),#23 

BNE 3$ 

2$: TSTB aSTKS 

BPL 2$ 

MOVB a$TK8.-(SP) 

BIC #-Cl7^(SP) 

CMP (SP)*.*21 

BNE 2$ 

BR 1$ 

3$: CMP 4(SP).#140 

BLT 4$ 

CMP 4(SP),*175 

BGT 4$ 

BIC #40,4(SP) 

4$: RTI 



.-PUSH DOWN THE PC 
:;SAVE THE PS 
.•WAIT FOR 
;.-A CHARACTER 
;;READ THE TTY 
;;GET RID OF JUNK IF ANY 
;;IS IT A CONTROL-S? 
; .-BRANCH IF NO 
:;WAIT FOh A CHARACTER 
;;LOOP UNTIL ITS THERE 
:;GET CHARACTER 
;;MAKE IT 7-eiT ASCII 
;;IS IT A CONTROL -Q? 
;;IF NOT DISCARD IT 
;;YES. RESUME 
;.-IS IT UPPER CASE? 
; .-BRANCH IF YES 
;.-IS IT A SPECIAL CHAR? 
; .-BRANCH IF YES 
;;MAKE IT UPPER CASE 



;G0 BACK TO USER 
••»»•»»»»•»»»»»•»»»•»»»»»»»»»»»»*»**»»»*»»»»*»»•»**••*•••*••••' 

•'•THIS ROUTINE WILL INPUT A STRING FROM THE TTY 
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A6?9 










.••CALL: 






4630 










• • 


RDLIN 




4631 










• • 


RETURN 


HERE 


4632 










; • 






4633 














R3.-(SP) 


4634 


036422 


010346 






SRDLIN: 


MOV 


4635 


036424 


005046 








CLR 


-(SP) 


4636 


036426 


012703 


036700 




1$: 


MOV 


#$TTYIN,R3 


4637 


036432 


022703 


036710 




2$: 


CMP 


#$TTYIN*8. ,R3 


4638 


036436 


101467 








BLOS 


4$ 


4639 


036440 


104411 








RDCHR 


(SP)+, (R3) 
#3, (R3) 


4640 


036442 


112613 








M0V8 


4641 


036444 


122713 


000003 






CMP8 


4642 


036450 


001006 








BNE 


10» 


4643 


036452 


104401 


036710 






TYPE 


,$CNTLC 


4644 


036456 


005726 








TST 


(SP)* 


4645 


036460 


012603 








MOV 


(SP)+.R3 


4646 


036462 


000137 


036752 
00017"' 






JMP 


CNTRLC 


4647 


036466 


122713 




10$: 


CMP8 


tt\77, {H5) 


4648 


036472 


001022 








BNE 


5$ 


4649 


036474 


005716 








TST 


(SP) 


4650 


036476 


001007 








BNE 


6S 

ft \.9$ 


4651 


036500 


112737 


0001 34 


036676 




MOVE 


4652 


036506 


104401 


036676 






TYPE 


.9$ 


4653 


036512 


012716 


y77777 






MOV 


^-1 , (SP; 


4654 


036516 


005303 






6$: 


DEC 




4655 


036520 


020327 


036700 






CMP 


R3.A$TTYIN 


4656 


036524 


103434 








BLO 


4» 


4657 


036526 


111337 


036676 






M0V8 


(R3) ,9$ 


4658 


036532 


104401 


036676 






TYPE 


,9$ 


4659 


036536 


000735 








BR 


2$ 


4660 


036540 


005716 






5$: 


TST 


(SP) 


4661 


036542 


001406 








BEQ 


7$ 

# \ . 9$ 


4662 


036544 


112737 


0001 34 


036676 




M0V8 


4663 


036552 


104401 


036676 






TYPE 


A^ 

,9$ 


4664 


036556 


005016 








CLR 


(Sf-J 


4665 


036560 


122713 


000025 




7$: 


CMP8 


*25, (R3) 


4666 


036564 


001003 








BNE 


8» 


4667 


036566 


104401 


036715 






TYPE 


.SCNTLU 


4668 


036572 


00071 5 








BR 


1$ 


4669 


036574 


122713 


000022 




8$: 


CMP8 


*22, (R3) 


4670 


036600 


001011 








BNE 


3S 


4671 


036602 


105013 








CLR8 


(R3) 


4672 


036604 


104401 


001223 






TYPE 


.$CRLF 


4673 


036610 


104401 


036700 






TYPE 


.STTYIN 


4674 


036614 


000706 








BR 


2$ 


4675 


036616 


104401 


001222 




4$: 


TYPE 


,$QUES 


4676 


036622 


000701 








BR 


1$ 


4677 


036624 


111337 


036676 




3$: 


M0V8 


/ r<t7 \ A# 

(R3) .91 


4678 


036650 


104401 


05btft 






TYPE 


9$ 


4679 


036634 


122723 


000015 






CMP8 


*15,(R3)* 


4680 


036640 


001274 








BNE 


2$ 


4681 


036642 


105063 


^77777 






CLR8 


-1(R3) 


4682 


036646 


104401 


001224 






TYPE 


,$LF 


4683 


036652 


005726 








TST 


(SP) + 


4684 


036654 


012603 








MOV 


(SP)+.R3 



91 



SEQ 0091 



.•INPUT A STRING FROM THE TTY 

.•ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
.•TERMINATOR WILL BE A BYTE OF ALL O'S 

.•SAVE R3 

; CLEAR THE RU80UT KEY 
.•GET ADDRESS 
;8UFFER FULL? 
•BR IF YES 

;G0 READ ONE CHARACTER FROM THE TTY 

.-GET CHARACTER 

;IS IT A CONTROL-C? 

.•BRANCH IF NO 

;TYPE A CONTROL-C (*C) 

.•CLEAN RUBOUT KEY OFF OF THE STACK 

.•RESTORE R3 

;GOTO CONTROL-C RESTART 
;IS IT A RUBOUT 
;8R IF NO 

;IS THIS THE FIRST RUBOUT? 
;8R IF NO 

;TYPE A BACK SLASH 

.-SET THE RUBOUT KEY 
.•BACKUP BY ONE 
.•STACK EMPTY? 
•BR IF YES 

;SETUP TO TYPEOUT THE DELETED CHAR. 
;G0 TYPE 

;G0 READ ANOTHER CHAR. 
; RUBOUT KEY SET? 
;8R IF NO 

.•TYPE A BACK SLASH 

.•CLEAR THE RUBOUT KEY 
;IS CHARACTER A CTRL U? 
;8R IF NO 

.•TYPE A CONTROL '\J"' 

;G0 S^ART OVER 

;IS CHARACTER A ""R"? 

.•BRANCH IF NO 

; CLEAR THE CHARACTER 

;TYPE A "CR" & "LF" 

.•TYPE THE INPUT STRING 

;G0 PICKUP ANOTHER CHACTER 

;TYPE A •?' 

; CLEAR THE BUFFER AND LOOP 
.•ECHO THE CHARACTER 

; CHECK FOR RETURN 

.-LOOP IF NOT RETURN 

; CLEAR RETURN (THE 15) 

.-TYPE A LINE FEED 

.•CLEAN RUeOUT KEY FROM THE STACK 

.■RESTORE R3 



CJKDAOO KTfll-AA mj OIAG 
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4685 
4686 

4687 

4688 

4689 

4690 

4691 

4692 

4693 

4694 

4695 

469o 

4697 

4698 

4699 

4700 

4701 

4702 

4705 

4/04 



036656 
036660 
036666 
036674 
036676 
036677 
036700 
036710 
036715 
036722 
036727 
036734 
036740 
036746 



011646 
016666 
012766 
000002 

000 

000 
000010 
041536 

136 
043536 

015 
036440 
020040 
020075 
036752 



000004 
036700 



005015 
006525 
005015 
051412 
000040 
042516 
000 



^wcvil 



30A(1052) 
TTy INPUT 



000002 
000004 



000 
000012 

000 
051127 



H-jAN-81 
ROUTINE 



B 8 

1 1 : 36 PAGE 



92 



S€0 009? 



9$: 

STTYIN 
tCNTLC 
tCNTLU 
ICNTLG 
SnSUR: 



MOV <SP),-(SP) 

MOV 4<SP>.2(SP) 

MOV *$TTYIN.4(SP) 
RTI 

.BYTE 0 

.BYTE 0 

.BLKB 8. 

.ASCIZ /*C/<15><12> 

.ASCIZ /•U/<'15><12> 

.ASCIZ /*o/<15><12> 

.ASCIZ <15><12>/SWR = / 



; .-ADJUST THE STACK AND PUT ADDRESS Of THE 
FIRST ASCII CHARACTER ON IT 



RETURN 

STORAGE FOR ASCII CHAR. TO TYPE 
TERMINATOR 

RESERVE 8 BYTES FOR TTY INPliT 



CONTROL 
CONTROL 
CONTROL 



"C 



020127 SMNEW: .ASCIZ / NEW = / 
.EVEN 

.SBTTL CONTROL-C SERVICING ROUTINE 



THE FOLLOWING CODE IS EXECUTED WHEN A CONTROL-C HAS 
BEEN TYPED INSTEAD OF A NEW SWITCH REG. VALUE. 



cjkdado ictfii-aa mi diag 

rjKDAO.Pn 19-DEC-80 11:05 

4705 
4706 
A 707 
4708 
4709 

4710 036752 013737 001234 

4711 036760 005237 001210 

4712 036764 104401 037031 

4713 036770 113737 001102 

4714 036776 013746 037024 

4715 037002 104402 

4716 037004 104401 037026 

4717 037010 013746 001210 

4718 037014 104405 

4719 037016 104407 

4720 037020 000137 033764 

4721 037024 000000 

4722 037026 020040 000 

4723 037031 112 046525 

4724 037036 043516 052040 

4725 037044 047105 026504 

4726 037052 050055 051501 

4727 037060 012 

4728 037061 124 051505 

4729 037066 020117 050040 

4730 037074 047123 006517 
4731 

4732 
4733 
4734 
4735 
4736 
4737 
4738 
4739 
4740 
4741 
4742 
4743 
4744 
4745 
4746 
4747 
4748 

4749 037102 105737 001157 

4750 037106 100002 

4751 037110 000000 

4752 037112 000430 

4753 037114 010046 

4754 037116 017600 000002 

4755 037122 122737 000001 

4756 037130 001011 

4757 037132 132737 000100 

4758 037140 001405 

4759 037142 010037 037152 

4760 037U6 004737 037444 



C 8 

MACY11 30A(1052) 14-JAN-81 11:36 PAGE 93 
CONTROL-C SERVICING ROUTINE 



037024 



044520 
020117 
043117 
006523 

047124 
051501 
000012 



001246 
001247 



(IN OTHER WORDS, AFTER A CONTROL-G WAS TYPED), 

A NEW SWITCH REG. VALUE WILL BE ASKED FOR, 

THE TEST NUMBER AND PASS NUMBER WILL BE TYPED. 

AND THEN THE PROGRAM WILL GO TO "END-OF-PASS" AND CONTINUE 

;GET THE VALUE OF "IPASS" 
iFORM CURRENT PASS NO. 
TYPE THE TEST STOPS MESSAGE 
SAVE THE TEST NUMBER 
.•SAVE 1$ FOR TYPEOUT 
;G0 TYPE— OCTAL ASCIICALL DIGITS) 
TYPE 2 SPACES 
.•SAVE $TMP5 FOR TYPEOUT 
;G0 TYPE— DECIMAL ASCII WITH SIGN 
;ASK FOR NEW SWR VALUE 
; CONTINUE AT $E0P*2 
;8UFFER FOR TEST NUMBER 
TWO SPACES AND THE STOP MESSAGE 
END-OF-PASS/<15><12> 



.ASCIZ /TESTNO PASSN0/<1''><12> 



CNTRLC : 


nuv 


CDACC CTMDL 




T Kir 


CTMO^ 




T VDC 
1 Trt 






nuvo 


CTCTIUM 1C 

9 1 O 1 ' W 1 . 1 9 




MOV 


1$,-(SP) 




TYPOC 






TYPE 


,2$ 




MOV 


$TMP5.-(SP) 




TYPDS 






GTSWR 






JMP 


$E0P*2 


1$: 


.WORD 


0 


2$: 


.ASCIZ 


/ / 


CMSG: 


.ASCII 


/JUMPING TO 



.S8TTL 



.EVBI 

TYPE ROUTINE 



■A************************************************************** 

♦ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 BYTE. 
*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 



*N0TE1 
•N0TE2 
*N0TE3 
* 

*CALL: 
*1) USING A 

* TYPE 
•OR 

* TYPE 

* MESADR 



SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
SFJLLS CONTAINS THE NLfBER OF FILLER CHARACTERS REQUIRED. 
SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 



TRAP INSTRUCTION 
.MESADR 



;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 



STYPE ; 



1$: 



TST8 

BPL 

HALT 

BR 

MOV 

MOV 

CMP8 

BNE 

BITS 

BEQ 

MOV 

JSR 



STPFLG 
1$ 

3$ 

RO.-(SP) 
a2(SP).R0 
#APTENV,$ENV 
62$ 

*APT SPOOL. SENVM 
62$ 

R0.6n 
PC.$ATY3 



IS THERE A TERMINAL? 
BR IF YES 

HALT HERE IF NO TERMINAL 

LEAVE 

SAVE RO 

GET ADDRESS OF ASCIZ STRING 

RUNNING IN APT MODE 

NO. GO CHECK FOR APT CONSOLE 

SPOOL MESSAGE TO APT 

NO, GO CHECK FOR CONSOLE 

SETUP MESSAGE ADDRESS FOR APT 

SPOOL MESSAGE TO APT 
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rjKDAD.Pn 19-0EC-80 11:05 TYPE ROUTINE 



A 761 


037152 


000000 






61 1: 


.WORD 




037154 


132737 


C00040 


001247 


62$: 


BI T8 


^763 


037162 


001003 








8NE 


476A 


037164 


112046 






2»: 


M0V8 


4765 


037166 


^\ A 4 ^vy% ^ 

001005 








BNE 


4766 


037170 


005726 








TST 




037172 


012600 






Z A* 

60S: 


nov 


4768 


0371 74 


062716 


y\My\M A ^ 

000002 




3$: 


ADD 


4769 


037200 


000002 








RTI 




037202 


122716 


/\ A /\ A 4 4 

00001 1 




4$: 


CW8 




037206 


001430 








BEO 


t^77Z 


037210 


122716 


000200 






CMP8 


4773 


037214 


001006 








BNE 


1*771* 


037216 


005726 








TST 


4775 


037220 


4 ft y / ft 4 

104401 








TYPE 


1*77 t 


037222 


001223 








$CRLF 


**777 


037224 


4 ft r ft77 

105037 


A77/ 7*^ 

037432 






CLR8 


4778 


037230 


000755 








BR 


1*779 


037232 


/\/\ y ^7 7 

004737 


/\ ^ ^7 4 y 

037314 




5$: 


JSR 


4780 


C37236 


4 ^^7^Z 

1 23726 


001 156 




6$: 


CriP8 


4781 


037242 


AA 4 7 Crt 

001350 








BNE 


4782 


037244 


ft4 77y z 

013746 


Aft 4 4 f y 

001 1 54 






MOV 


4783 














4784 


ft77^C ft 

037250 


4 ft C 7Z Z 

105366 


ftftftftft 1 

000001 




75: 


DElB 


4785 


037254 


ftftT77ft 

002770 








BLT 


4786 


ft 7 7-^^ ^ 

037256 


f\f\/ 777 

004 737 


ft 777 4 y 

037314 






JSR 




ft7 70Z. 

057262 


1 ftr7 z 7 

105337 


037432 






0EC8 


4788 


/\77^^ ^ 

037266 


ftftft77ft 

000770 








BR 


4789 














4790 










.•HORIZONTAL T 


4791 














4792 


AT7^7ft 

037270 


4 4 ^71 Z 

1 12716 


ftftftft/ ft 

000040 




8S: 


Move 


4793 


/\7 7T7/ 

037274 


ftfty 777 

004737 


ft7774 y 

037514 




9$: 


JSR 


4794 


/\7^7rt/\ 

037300 


4 7 ^77 7 

132737 


AAA AA7 

000007 


ft 7^ y 7 

037432 




BITS 


4795 


A777A^ 

037306 


ftftl 77T 

001 372 








BNE 


4796 


/\ 777 < ft 

037310 


005726 








TST 


y 7ft 7 


037512 


ftftft 7 ^ y 

000724 








BR 


y 7ft o 

4798 


037314 








STYPEC: 




y 7ftft 

4799 


ft 777 n / 

037314 


4 ftC 777 

105777 


4 y 4 z ^y 

141624 






TST8 


4800 


A7770ft 

03''320 


4 ftftft 

1 00022 








BPL 


4801 


037322 


A 4 77 y Z 

01 7746 


4 y 4 y "^A 

141620 






MOV 


4802 


ft 777TZ 

037326 


fty ^74 z 

042716 


4 77Z Aft 

1 77600 






BIC 


y Qrt7 

4803 


^77 ^ 

037332 


4 '^74 £ 

122716 


Aftftft ft7 

000023 






CMP8 


y Ofty 

4804 


ft7777^ 

037336 


ftft4 ft4 ^ 

001012 








e\E 


4805 


ftT7T/ ft 

037340 








101$: 




4806 


A777 J ft 

037340 


4 Ar777 

105777 


4 y 4 Z AA 

141600 






TST8 


4807 


ft77Ty y 

037344 


1 ftft7 7C 

100375 








BPL 


4808 


rt7 77 / Z 

037346 


1 1 7716 


141 57h 






M0V8 


y Oftft 

4809 


ft777C 1 

037352 


fty ^74 Z 

042716 


4 77Z A A 

1 77600 






BIC 


y o 1 ft 

4810 


037356 


122716 


ftftftft O 4 

000021 






CMP8 


HO 1 1 




UU 1 JOO 








BNE 


4812 


037364 








102$: 




4813 


037364 


005726 








TST 


4814 


037366 








10$: 




4815 


037366 


105777 


141556 






TST8 


4816 


037372 


100375 








BPL 



D 8 

J-81 11:36 PAGE 94 



SEO 0094 



#APTCSUP,$ENV« 
60S 

(RO)*.-(SP) 
4$ 

(SP) + 

(SP)*,RO 

<f2.(SP) 

»H7, (bP) 
8$ 

*CRLF,(SP) 
5$ 

(SP)* 



$C^'ARCNT 
2$ 

PC.$TYPEC 

$FILLC,(SP)* 

2$ 

$NULL.-(SP) 

KSP) 
6$ 

PC.$TYPEC 

$CHARCNT 

7$ 

PROCESSOR 

.(SP) 
PC,$TYPEC 
*7,SCHARCNT 
9$ 

(SP)* 
2$ 

aSTKS 
10$ 

a$TKB--(SP) 
#177600. (SP) 
mOFF.CSP) 
102$ 

9$TKS 
101$ 

a$TK8,(SP) 
#177600. (SP) 
#$X0N.(SP) 
101$ 

(SP) + 

a$TPs 

10$ 



MESSAGE ADDRESS 

APT CONSOLE SUPPRESSED 

YES. SKIP TYPE OUT 

PUSH CHARACTER TO BE TYPED ONTO STACK 

8R IF IT ISN'T THE TERMINATE 

IF TERMINATOR POP IT OFF THE STACK 

RESTORE RO 

ADJUST RETURN PC 

RETURN 

BRANCH IF <HT> 

BRANCH IF NOT <CRLF> 

POP <CR><LF> EOUIV 
TYPE A CR AND LF 

CLEAR CHARACTER COUNT 

GET NEXT CHARACTER 

GO TYPE THIS CHARACTER 

IS IT TIME FOR FILLER CHARS.? 

If NO GO GET NEXT CHAR. 

GET # OF FILLER CHARS. NEEDED 

AND THE NULL CHAR. 

DOES A NULL NEED TO BE TYPED? 

BR IF NO— GO POP THE NULL OFF OF STACK 

GO TYPE A NULL 

DO NOT COUNT AS A COUNT 

LOOP 



;; REPLACE TAB WITH SPACE 
;;TYPE A SPACE 
; .-BRANCH IF NOT AT 
;;TAB STOP 

;;POP SPACE OFF STACK 
;;GET NEXT CHARACTER 

;;CHAR IN KY8D BUFFER? 
:;8R IF NOT 
;;GET CHAR 

;; STRIP EXTRANEOUS BITS 
;;WAS CHAR XOFF 
;;8R IF NOT 

;;WAIT FOR CHAR 

;;GET CHAR 
:; STRIP IT 
;;WAS IT XON? 
;;8R IF NOT 

;;FIX STACK 

;;WAIT UNTIL PRINTER IS READY 



M J 0001 
MJDOOl 
MJD001 
MJDOOl 
MJDOOl 
MJDOOl 
njDOOl 

njDOOl 
njDOOl 

MJDOOl 
MJDOOl 
MJDOOl 
MJDOOl 
MJDOOl 
MJDOOl 
MJDOOl 

;MJD001 
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PAGE 



95 



SEO 009S 



^81 7 


037374 


116677 


000002 


^8^8 


037402 


122766 


000015 


4819 


037410 


001003 




4820 


037412 


105037 


037432 


4821 


037416 


000406 




4822 


037420 


122766 


000012 


4823 


037426 


001402 




4824 


037/ 30 


105227 




4825 


037432 


000000 




4826 


037434 


000207 




4827 








4828 








4829 








4830 








4831 


037436 


112737 


000001 


4832 


037444 


112737 


000001 


4833 


037452 


000403 




4834 


037454 


112737 


000001 


4835 


037462 






4836 


037462 


010046 




4837 


037464 


010146 




4838 


037466 


10573' 


037700 


4839 


037472 


001450 




4840 


037474 


122737 


000001 


4841 


037502 


001031 




4842 


037504 


132737 


000100 


4843 


037512 


001425 




4844 


037514 


017600 


000004 


4845 


037520 


062766 


000002 


4846 


037526 


005737 


001226 


4847 


037532 


001 575 




4848 


037534 


010037 


001242 


4849 


037540 


105720 




4850 


037542 


001 376 




4851 


037544 


163700 


001242 


4852 


037550 


006200 




4853 


037552 


010037 


001244 


4854 


037556 


012737 


000004 


4855 


037564 


000413 




4856 


037566 


017637 


000004 


4857 


037574 


062766 


000002 


4858 


037602 


013746 


1 77776 


4859 


037606 


004737 


037102 


4860 


037612 


000000 




4861 


037614 






4862 


037614 


105737 


037702 


4863 


037620 


001416 




4864 


037622 


005737 


001246 


4865 


037626 


001413 




4866 


037630 


005737 


001226 


4867 


037634 


001375 




4868 


037636 


017637 


000004 


4869 


037644 


062766 


000002 


4870 


037652 


005237 


001226 


4871 


037656 


105037 


037702 


4872 


037662 


105037 


037701 



141550 
000002 



000002 1$: 



037702 
037700 

037702 



001246 
001247 

000004 



001226 

037612 
000004 



001230 
000004 



M0V8 
CMPS 
BNE 
CLR8 
BR 
CMP8 
BEQ 
INCB 
SCHARCNT.-.UORD 
STYPEX: RTS 



BE TYPED INTO DATA REG. 
A CARRIAGE RETURN? 



2(SP).a$TPB ;;L0AD CHAR tq 

*CR.2(SP) ;;IS CHARACTER 

1$ ; .-BRANCH IF NO 

SCHARCNT ;; YES— CLEAR CHARACTER COUNT 

STYPEX • 'EXI T 

*LF,2(SP) ;;IS CHARACTER A LINE FEED? 

STYPEX ;. -BRANCH IF YES 

(PC)* ;; COUNT THE CHARACTER 

0 ;; CHARACTER COUNT STORAGE 

PC 



.S8TTL APT COMMUNICATIONS ROUTINE 



SATYI : 
$ATY3: 

$ATY4: 
$ATYC: 



1$: 
2$; 



3$: 



4S: 
5$: 
10$: 



11$: 



12$: 



MOVB *1.$FFLG 

M0V8 *1.$MFLG 

BR $ATYC 

MOVB #1.$FFL6 

MOV RO.-(SP) 

MOV R1,-(SP) 

TST8 $MFL6 

BEQ 5$ 

CMP8 *APTENV.$ENV 

BNE 3$ 

BITB <rAPTSPOOL,$ENVM 

BEQ 3$ 

MOV a4(SP),R0 

ADD <r2.4(SP) 

TS1 $MSGTYPE 

BNE 1$ 

MOV RO.$MSGAD 

TSTB (R0)+ 

BNE 2$ 

SUB SMSGAD.RO 

ASR RO 

MOV RO.$MSGLGT 

MOV /lf4,$MS6TYPE 

BR 5$ 

MOV a4(SP),4$ 

ADD <r2,4(SP) 

MOV 1 77776. -(SP) 

JSR PC,$TYPE 

.WORD 0 

TSTB $FFL6 

BEQ 12$ 

TST $ENV 

BEQ 12$ 

TST $MSGTYPE 

BNE 11$ 

MOV a4(SP),$FATAL 

ADD *2,4(SP) 

INC $MS6TYPE 

CLR8 $FFLG 

CLRB $LFLG 



;;T0 REPORT FATAL ERROR 
;;T0 TYPE A MESSAGE 

;;T0 ONLY REPORT FATAL ERROR 

;;PUSH RO ON STACK 
;;PUSH R1 ON STACK 
.-.-SHOULD TYPE A MESSAGE? 
;;IF NOT: BR 
.-.-OPERATING UNDER APT? 
;;IF NOT: BR 
;; SHOULD SPOOL MESSAGES? 
;;IF NOT: BR 
.-.-GET MESSAGE ADDR. 

.-.-BUMP RETURN ADDR. 
;;SEE IF DONE W/ LAST XMISSION? 
;;IF NOT: WAIT 
;;PUT ADDR IN MAILBOX 
;;FIND END OF MESSAGE 

;;SUB START OF MESSAGE 
.-.-GET MESSAGE LNGTH IN WORDS 
.-.-PUT LENGTH IN MAILBOX 
;;TELL APT TO TAKE MSG. 

.;PUT MSG ADDR IN JSR LINKAGE 
: -BUMP RETURN ADDRESS 
.-.-PUSH 177776 ON STACK 
;;CALL TYPE MACRO 



;; SHOULD REPORT FATAI ERROR? 

;;IF NOT: BR 

; .-RUNNING UNDER APT? 

;;IF NOT: BR 

; .-FINISHED LAST MESSAGE"* 

;;IF NOT: WAIT 

;;6ET ERROR » 

;;BUMP RETURN ADDR. 
r;TELL APT TO TAKE ERROR 

CLEAR FATAL FLAG 

CLEAR LOG FLAG 
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bEQ 0096 



LSK7\ 




105037 


LR7L 


n^7^>7? 


01 ?601 


HO' J 


0^7^74 


C1?600 


HO' o 


0^7676 


000?07 


LfC77 

HO ' ' 


0X7700 


000 


HO f O 


077701 


000 


^879 


03770? 


000 


HOOV 




037704 






000200 


488? 




000001 


4883 




000100 

Www ' w 






000040 








4886 






4887 






4888 






4889 






4890 






4891 






489? 






4893 






4894 


057704 


010146 


4895 


037706 


016601 


4896 


037712 


000261 


4897 


0377H 


112737 


4898 


QJ7722 


006101 

WW ' W ' 


4899 


037724 


001406 


4900 

H7W 


037726 


105537 


4901 


037712 


104401 


4902 


037736 


000241 


4903 


037740 


000765 


4904 


037742 


012601 


4905 


037744 


016666 


4906 


037752 


012616 


4907 


037754 


000002 


4908 


037756 


000 


4909 






4910 






491 1 






491? 






491 3 






4914 






4915 






4916 






4917 






4918 






4919 






4920 






4921 






4922 






4923 






4924 






4925 






4926 






4927 






4928 







000006 
000060 



037756 
037756 



000002 
000 



000004 



;; CLEAR MESSAGE FLAG 
;;POP STACK INTO R1 
;;POP STACK INTO RO 
; .-RETURN 
;;MESSG. FLAG 
;;L06 FLAG 
;; FATAL FLAG 



CLR8 SMFLG 

MOV (SP)*.R1 

MOV (SP)*.RO 

RTS PC 
$MFL6: .BYTE 0 
SLFLG; .BYTE 0 
SFFLG: .BYTE 0 

.EVEN 
APTSIZE=200 
APTENV=001 
APT SPOOL =100 
APTCSUP=040 

.S8TTL BINARY TO ASCII AND TYPE ROUTINE 

•.»♦•»»•♦•*•*•♦»♦**♦••»»•**♦•♦•**••*••**••*»*******•***•***•***** 

•iTHIS ROUTINE IS USED TO CHANGE A 16-6IT BINARY NU*BER TO A 16-BIT 
;*BINARY-ASCII NUMBER AND TYPE IT. 
• *CALL • 

;;Nl/eER TO BE TYPED 

;;TYPE IT 



• 



MOV 
TYP8N 



NUMBER, -(SP) 



$TYP8N: 



037756 1$: 



2S: 



$BIN: 
.SBTTL 



MOV 

MOV 

SEC 

MOVB 

ROL 

BEQ 

ADC8 

TYPE 

CLC 

BR 

MOV 

MOV 

MOV 

RTI 

.BYTE 

BINARY 



R1,-(SP) ;;SAVE R1 ON THE STACK 

6(SP).R1 ;;GET THE INPUT NUMBER 

;;SET "C" SO CAN KEEP TRACK OF THE NUMBER OF BITS 

<r'0,$BIN ;;SET CHARACTER TO AN ASCII "0". 

R1 ;;GET THIS BIT 

2$ ;;D0NE? 

$8IN ;;N0— SET THE CHARACTER EQUAL TO THIS BIT 

,$8IN ;;G0 TYPE THIS BIT 

;; CLEAR "C" SO CAN KEEP TRACK OF BITS 

1$ ;;G0 DO THE NEXT BIT 

(SP)*,R1 ;;POP THE STACK INTO R1 

2(SP).4(SP) ; .-ADJUST THE STACK 
(SP)*,(SP) 



;; RE TURN TO USER 
0.0 .-.-STORAGE FOR ASCII CHAR, 

TO OCTAL (ASCII) AND TYPE 



AND TERMINATOR 



' ********************* 

;WhIS routine IS USED 
;<»OCTAL (ASCII) NUMBER 

;*$TYP0S ENTER HERE 

;*CALL; 
;• MOV 

TYPOS 

.BYTE 

.BYTE 

• • 

•*$TYPON ENTER HERE 

.♦STYPOS OR STYPOC 
.••CALL: 

MOV NUM,-( 
TYPON 



TO CHANGE A 16-6IT BINARY NUMBER TO A 6-DIGIT 
AND TYPE IT. , „^ 

TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 



NUM.-(SP) 

N 
M 



.-.•NUMBER BE TYPED 
;;CALL FOR T^PEOUT 

;;N=1 TO 6 FOR NLWBER OF DIGITS TO TYPE 
;;«=1 OR 0 

;;1=TYPE LEADING ZEROS 
;;0=SUPPRESS LEADING ZEROS 

TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 



SP) 



;. •NUMBER TO BE TYPED 
.-.-CALL FOR TYPE OUT 



G 8 
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4929 










.••STrPOC ENTER HERE FOR TYPEOUT 


OF A 16 BIT NtfBER 


4930 










;»CALL: 










4931 










• • 


MOV 


NUM,-(SP) 




.-NLMBER TO BE TYPED 


4932 












TYPOC 






.-CALL FOR TYPEOUT 


4933 




















4934 


037760 


017646 


000000 




$TYPOS: 


MOV 


a^sp) ,-(SP) 

1(SP).$0FILL 




.•PICKUP THE MODE 


4935 


037764 


116637 


000001 


040203 




novB 




.-LOAD ZERO FILL SWITCH 


4936 


037772 


112637 


040205 






MOVB 


(SP)*,S0M0DE*1 


'. 


;NUW3ER OF DIGITS TO TYPE 


4937 


037776 


062716 


000002 






ADD 


#2,(SP) 


'. 


.•ADJUST RETURN ADDRESS 


4938 


040002 


000406 








BR 


STYPON 






4939 


040004 


112737 


000001 


040203 


STYPOC: 


M0V8 


Al.SOFILL 


. 


;SET THE ZERO FILL SWITCH 


4940 


040012 


112737 


000006 


040205 




novB 


*6,$0M0DE*1 


'. 


;SET FOR SIX(6) DIGITS 


4941 


040020 


112737 


000005 


040202 


$TVPON: 


MOVB 


*5, SOCNT 


*- 


;SET THE ITERATION COUNT 


4942 


040026 


010346 








MOV 


R3.-(SP) 




.-SAVE R3 


4943 


040030 


010446 








MOV 


R4,-(SP) 




;SAVE R4 


4944 


040032 


010546 








MOV 


R5.-(SP) 




;SAVE R5 


4945 


040034 


113704 


040205 






MOVB 


SOMODE+1 .R4 




;GET THE NUMBER OF DIGITS TO TYPE 


4946 


040040 


005404 








NEG 


R4 






4947 


040042 


062704 


000006 






ADD 


#6,R4 




.•SUBTRACT IT FOR MAX. ALLOWED 


4948 


C40046 


110437 


040204 






MOVB 


R4,S0M0DE 


. 


;SAVE IT FOR USE 


4949 


040052 


113704 


040203 






MOVB 


S0FJLL,R4 




;GET THE ZERO FILL SWITCH 


4950 


040056 


016605 


000012 






MOV 


12(SP).R5 




.•PICKUP THE INPUT NUMBER 


4951 


040062 


005003 








CLR 


R3 




.•CLEAR THE OUTPUT WORD 
.•ROTATE MSB INTO "C" 


4952 


040064 


006105 






IS: 


ROL 


R5 




4953 


040066 


000404 








BR 


3S 




;G0 DO MSB 


4954 


040070 


006105 






2$: 


ROL 


R5 




.•FORM THIS DIGIT 


4955 


040072 


006105 








ROL 


R5 






4956 


040074 


006105 








ROL 


R5 






4957 


040076 


010503 








MOV 


R5.R3 






4958 


040100 


006103 






3$: 


ROL 


R3 




;6ET LS8 OF THIS DIGIT 


4959 


040102 


105337 


040204 






DECB 


SOMODE 




;TYPE THIS DIGIT? 


4960 


040106 


100016 








BPL 


7S 




;6R IF NO 


4961 


040110 


042703 


177770 






BIC 


#1 77770, R3 




;GET RID OF JUNK 


4962 


040114 


001002 








BNE 


4S 




.•TEST FOR 0 


4963 


040116 


005704 








TST 


R4 




.•SUPPRESS THIS 0? 


4964 


040120 


001403 








BEO 


5S 




;8R IF YES 


4965 


040122 


005204 






4S: 


INC 


R4 




.•DON'T SUPPRESS ANYMORE O'S 


4966 


040124 


052703 


000060 






BIS 


*'0.R3 
,R3 




.-MAKE THIS DIGIT ASCII 


4967 


040130 


052703 


000040 




5S: 


BIS 




.•MAKE ASCII IP NOT ALREADY 


4968 


040134 


110337 


040200 






MOVB 


R3,8S 




.•SAVE FOR TYPING 


4969 


040140 


104401 


040200 






TYPE 


,8S 




.•GO TYPE THIS DIGIT 


4970 


040144 


105337 


040202 




7$: 


DECB 


SOCNT 




.•COUNT BY 1 


4971 


0401 50 


003347 








BGT 


2S 




;8R IF MORE TO DO 


4972 


0401 52 


002402 








BLT 


6S 




;8R IF DONE 


4973 


040154 


005204 








INC 


R4 




.•INSURE LAST DIGIT ISN'T A BLANK 


4974 


0401 56 


000744 








BR 


2S 




;G0 DO THE LAST DIGIT 


4975 


040160 


012605 






6$: 


MOV 


(SP)*,R5 




.-RESTORE R5 


4976 


040162 


012604 








MOV 


(SP)+,R4 




.•RESTORE R4 


4977 


040164 


012603 








MOV 


(SP)*,R3 




.•RESTORE R3 


4978 


040166 


016666 


000002 


000004 




MOV 


2(SP).4(SP) 




.-SET THE STACK FOR RETURNING 


4979 


040174 


012616 








MOV 


(SP)*,(SP) 






4980 


0401 76 


000002 








RTI 




•RETURN 


4981 


040200 


000 






8S: 


.BYTE 


0 




[•STORAGE FOR ASCII DIGIT 


4982 


040201 


000 








.BYTE 


0 




.•TERMINATOR FOR TYPE ROUTINE 


4983 


040202 


000 






SOCNT : 

SOFi'LL: 


.BYTE 


0 




.•OCTAL DIGIT COUNTER 


4984 


040203 


000 






.BYTE 


0 




.•ZERO FILL SWITCH 



CJKDAOO KTfll-AA m) DIAG 
rjKDAO.Pn 19-0EC-80 11:05 



A985 

<.986 

A987 

<.988 

4989 

4990 

4991 

4992 

4993 

4994 

4995 

4996 

4997 

4998 

4999 

5000 

5001 

5002 

5003 

5004 

5005 

5006 

5007 

5008 

5009 

5010 

5011 

5012 

5013 

5014 

5015 

5016 

5017 

5018 

5019 

5020 

5021 

5022 

5023 

5024 

5025 

5026 

5027 

5028 

5029 

5030 

5031 

5032 

5033 

5034 

5035 

5036 

5037 

5038 

5039 

5040 



040204 000000 



040206 
040206 
040210 
040212 
040214 
040216 
C40220 
040224 
040230 
040232 
040234 
040242 
040244 
040250 
040254 
040256 
040262 
040264 
040266 
040270 
040272 
040274 
040276 
040300 
040302 
040304 
040306 
040310 
040316 
040322 
040326 
040330 
040332 
040336 
040340 
040342 
040344 
040346 
040350 
040352 
040360 
040362 
040364 



010046 
010146 
010246 
01C346 
010546 
012746 
016605 
100004 
005405 
112766 
005000 
012703 
112723 
005002 
016001 
160105 
002402 
005202 
000774 
060105 
005702 
001002 
105716 
100407 
106316 
103003 
116663 
052702 
052702 
110223 
005720 
020027 
002746 
003002 
010502 
000764 
105726 
100003 
116663 
105013 
012605 
012603 
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BlUARi TO OCTAL (ASCII) AND TYPE 

lOMODE: .WORD 0 :. -NUMBER OF DIGITS TO TYPE 
.S8TTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 



*THIS ROUTINE IS USED TO CHANGE A 16H3IT BINARY NUMBER TO A 5-DIGIT 
•SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
•NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
•BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
•REPLACED WITH SPACES. 



SEO 0098 



020200 
000020 



000055 000001 



040422 
000040 

040412 



000001 
000060 
000040 



000010 



}77777 



•CALL; 



STYPDS; 



1$: 



2$: 
3$: 



4$: 



5$: 



6t: 
7$: 



^77777 177776 



8S: 



9$: 



MOV NUM.-(SP) 
TYPDS 



MOV RO.-(SP) 

MOV RI.-(SP) 

MOV R2.-(SP) 

MOV R3.-(SP) 

MOV R5,-(SP) 

MOV *20200.-(SP) 

MOV 20(SP).R5 

BPL 1$ 

NEG RS 

M0V8 *'-,1(SP) 

CLR RO 

MOV *$D8LK.R3 

M0V8 *• ,(R3)* 

CLR R2 

MOV $DT8L(R0),R1 

SUB R1.R5 

BLT 4$ 

INC R2 

BR 3$ 

ADD R1,R5 

TST R2 

BNE 5$ 

TST8 (SP) 

BMI 7$ 

ASLB (SP) 

BCC 6S 

M0V8 1 (SP). -1(R3) 

BIS *'0.R2 

BIS *• ,R2 

M0V8 R2,(R3)* 

TST (RO)* 

CMP R0,#10 

BLT 2$ 

BGT 8S 

MOV R5,R2 

BR 6$ 

TST8 (SP)* 

BPL 9$ 

MOVB -1(SP),-2(R3) 

CLR8 (R3) 

MOV (SP)*.R5 

MOV (SP)*.R3 



;;PUT THE BINARY NUMBER ON THE STACK 
;;G0 TO THE ROUTINE 



PUSH RO ON STACK 

PUSH R1 ON STACK 

PUSH R2 ON STACK 

PUSH R3 ON STACK 

PUSH R5 ON STACK 

SET BLANK SWITCH AND SIGN 

GET THE INPUT NUMBER 

BR IF INPUT IS POS. 

MAKE THE BINARY NUMBER POS. 

MAKE THE ASCII NUMBER NEG. 

ZERO THE CONSTANTS INDEX 

SETUP THE OUTPUT POINTER 

SET THE FIRST CHARACTER TO A BLANK 

CLEAR THE BCD NUMBER 

GET THE CONSTANT 

FORM THIS BCD DIGIT 

BR IF DONE 

INCREASE THE BCD DIGIT BY 1 

ADD BACK THE CONSTANT 

CHECK IF BCD DIGn=0 

FALL THROUGH IF 0 

STILL DOING LEADING O'S? 

BR IF YES 

MSD? 

8R IF NO 

YES— SET THE SIGN 

MAKE THE BCD DIGIT ASCII 

MAKE IT A SPACE IF NOT ALREADY A DIGIT 

PUT THIS CHARACTER IN THE OUTPUT BUFFER 

JUST INCREMENTING 

CHECK THE TABLE INDEX 

GO DO THE NEXT DIGIT 

GO TO EXIT 

GET THE LSD 

GO CHANGE TO ASCII 

WAS THE LSD THE FIRST NON-ZERO^ 

BR IF NO 

YES— SET THE SIGN FOR TYPING 
SET THE TERMINATOR 
POP STACK INTO R5 
POP STACK INTO R3 



JUDADO KTF11- 



■AA mu DIAG 
19-DEC-80 11:05 
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CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 



50^1 

50^2 

5045 

5044 

5045 

5046 

5047 

5048 

5049 

5050 

5051 

5052 

5053 

5054 

5055 

5056 

5057 

5058 

5059 

5060 

5061 

506? 

5063 

5064 

5065 

5066 

5067 

5068 

5069 

5070 

5071 

5072 

5073 

5074 

5075 

5076 

5077 

5078 

5079 

5080 

5081 

5082 

5083 

5084 

5085 

5086 

5087 

5088 

5089 

5090 

5091 

5092 

5093 

5094 

5095 

5096 



040366 
040370 
040372 
040374 
040400 
040406 
040410 
040412 
040414 
040416 
040420 
040422 



040432 
040432 
040434 
040436 
040440 
040442 
040444 
040446 
040452 
040456 
040462 
040466 



040470 
040470 
040474 
040500 
040504 
040510 
040512 
040514 
040516 
040520 
040522 



012602 
012601 
012600 
104401 
016666 
012616 
000002 
023420 
001750 
000144 
000012 
000004 



010046 
010146 
010246 
010346 
010446 
010546 
016646 
016646 
016646 
016646 
000002 



012666 
012666 
012666 
012666 
012605 
012604 
012603 
012602 
012601 
012600 



040422 
000002 



000004 



000022 
000022 
000022 
000022 



000022 
000022 
000022 
000022 



$DT8L: 



MOV 

MOV 

MOV 

TYPE 

MOV 

MOV 

RTI 

10000. 
1000. 
100. 
10. 
.8LKU 



(SP)*.R2 

(SP)*,R1 

(SP)*,R0 

,$D8LK 

2(SP).4(SP) 

(SP)*,(SP) 



;POP STACK INTO R2 
;POP STACK INTO R1 
;POP STACK INTO RO 
;NOW TYPE THE NUMBER 
.•ADJUST THE STACK 

;; RE TURN TO USER 



SDBLK: 

.SBTTL SAVE AND RESTORE R0-R5 ROUTINES 

********************************************************* 

»SAVE R0-R5 
•CALL: 

• SAVREG 

•UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 
• 

• TOP (*16) 

• +2 (*18) 

• +4 fi5 

• +6 R4 

• +8 fi3 

•♦10 R2 

•♦12 R1 

• ♦14 RO 



SSAVREG: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 

•RESTORE R0-R5 



RO.-(SP) 

R1,-(SP) 

R2.-(SP) 

R3.-(SP) 

R4.-(SP) 

R5.-(SP) 

22(SP),-(SP) 

22(SP),-(SP) 

22iSP),'(SP) 



PUSH 
PUSH 
PUSH 
PUSH 
PUSH 
PUSH 
SAVE 
SAVE 
SAVE 
SAVE 



RO ON 
R1 ON 
R2 ON 
R3 ON 
R4 ON 
R5 ON 
PS OF 
PC OF 
PS OF 
PC OF 



STACK 

STACK 

STACK 

STACK 

STACK 

STACK 

MAIN FLOW 

MAIN FLOW 

CALL 

CALL 



•CALL; 
SRESREG: 



RESREG 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



(SP)*,22(SP) 

(SP)*,22{SP) 

(SP)+,22(SP> 

(SP)*.22(SP) 

(SP)*,R5 

(SP)*.R4 

(SP)*,R3 

(SP)*.R2 

(SP)*,R1 

(SP)+.RO 



RESTORE PC OF CALL 
RESTORE PS OF CALL 
RESTORE PC OF MAIN FLOW 
RESTORE PS OF MAIN FLOW 
POP STACK INTO R5 
POP STACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO R1 
POP STACK INTO RO 
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5097 


040524 


000002 


5098 






5099 






5100 






5101 






510? 






5103 






5104 






5105 






5106 






5107 






5108 






5109 


040526 


104413 


5110 


040530 


016601 


5111 


040534 


012705 


5112 


040540 


012704 


5113 


040544 


012703 


5114 


040550 


012100 


5115 


040552 


012101 


5116 


C40554 


005002 


5117 


040556 


110245 


5118 


040560 


010002 


5119 


040562 


005304 


5120 


040564 


003007 


5121 


040566 


001405 


5122 


040570 


005205 


5123 


040572 


010566 


5124 


040576 


104414 


5125 


040600 


000207 


5126 


040602 


006203 


5127 


040604 


006001 


5128 


040606 


006000 


5129 


040610 


006001 


5130 


040612 


006000 


5131 


040614 


006001 


5132 


040616 


006000 


5133 


040620 


040302 


5134 


040622 


062702 


5135 


040626 


000753 


5136 


040630 


00001^ 



J 8 

inACvn 30A(1052) 14-JAN-81 11:36 PAGE 
SAVE AND RESTORE R0-R5 ROUTINES 

RTI 



100 



SEO 0100 



,S8TTL DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 

iTHlS ROUTINE WILL CONVERT A 32-81 T UNSIGNED BINARY NUMBER TO AN 
•UNSIGNED OCTAL ASCIZ NUMBER. 



000002 
040645 
000014 
177770 



000002 



000060 





MOV 




• DHTIUTCD TO 1 ml UHOfN OC DfklADV lUI MDC D 

;rUJiMltn lU LUW WUNL' Ur OJIMnKT IMUTBcn 


• * 


JSR 




• TAI 1 TUC Dm IT TMC 




RE TURN 


• Tuc Annoccc nc tuc ctdct act 17 tuaq rc mu 

, 1 nC Alfl^nCJO ur 1 nC rinol ndLi£ LIAn. Jo Unl 


>DB20: 


SAVRcG 




• CAV/C Al 1 DC^rCTtOC 
, oAVC ALL Kcuiolcna 




MOV 


2(SP).R1 ; 


• DTfk'IID TUP OniMTPQ TD 1 HU UDOn 




nUV 


»*UL 1 VL* 1 J . »K J , 






nOV 


ff\c. ,H'* , 


• nn PI PV/PKI ruAQAPTPQC 




Mm/ 

nOV 








nUV 


^ D1 w on • 


• 1 mjpo unon 




nUv 


Vn 1 / ▼ ,n 1 , 


• U f CM UORD 




ri D 
LLn 




• TPRMTMATOR 




Mnv/R 




•PUT THARArrFR IN DATA TAfil F 




MDV/ 

nUV 


DO Q7 


« Uu 1 1 ni o i/i ui 1 






DL 


• rni IWT TWI^ TMARArTFR 




on 


J* • 


■OR FP MOT TMF 1 A^T ni^IT 




DC n 

□bU 


5t 

C9 . 


• QR IP IT I^ TUP 1 A^T fMnfT 








■ All rtlf^ITC DDKIF— An II I^T PDTMTPR FOR F IR^T 




MOV 


R5 2(SP) 


•ASCIZ CHAR. & PUT IT ON THE STACK 




RESREG 


•RESTORE ALL REGISTERS 




RTS 


PC ; 


.•RETURN TO USER 


2$: 


ASR 


R3 


.•POSITION THE MASK FOR THE LAST DIGIT 


3$: 


ROR 


RI 


.•POSITION THE BINARY NUTBER FOR 




ROR 


RO 


THE NEXT OCTAL DIGIT 




ROR 


RI 






ROR 


RO 






ROR 


RI 






ROR 


RO 






BIC 


R3,R2 


.•MASK OUT ALL JUNK 




ADD 


#'0.R2 


;MAKE THIS CHAR. ASCII 




BR 


1$ 


;G0 PUT IT IN THE DATA TABLE 


SOCTVL: 


.8LK8 


14. 


.•RESERVE DATA TABLE 



< 
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3 1 1 






T 1 MC 






J I** J 














040646 

vHVOHO 


010046 


J 1 HO 


040650 


016600 


J 1 H f 


040654 

vHVAj JH 


005740 

WW J f "w 


J 1 HO 


040656 


1 1 1000 

1 1 1 www 


J 1 HT 


040660 


006300 

WWVj JWW 






01^000 

w 1 wwww 


S1S1 




WWWC WW 


SI s? 

? 1 JC 












^ 1 JH 






S15S 










011646 




040672 


016666 

W ' wWwW 


5158 


040700 


000002 

WW WWWk 


51 59 






5160 






5161 






516? 






516^ 






5164 






5165 






5166 






5167 

^ 1 Or 


040702 


040670 


5168 


040704 

W**W r W** 


037102 

W-/ r 1 WC 


5169 


040706 

W"»Wr WW 


040004 

w~ WWW^ 


5170 


040710 

W~Wr 1 W 


037760 

W^ • • WW 


5171 


040712 

W^Wr 1 C- 


040020 

W~ WWfc w 


J \ f c 


040714 


040206 

W~ Wfc WW 


5173 


040716 

W~ W r 1 U 


037704 

w^ • • w~ 








5175 


040720 

W^ W • b w 


036030 

W^WW^ w 


5176 






5177 

Jiff 


040722 


035760 

W^ ^ • WW 


5178 


G40724 


036302 


5179 


040726 

W~W* bW 


036422 


5180 


040730 

W^Wr JW 


040432 

W~ W~ 


5181 


040732 


040470 

W~W^ f w 


5182 






5183 






5184 






5185 






5186 


040734 


012737 


5187 


040742 


012737 


5188 


040750 


010046 


5189 


040752 


010K6 


5190 


040754 


010246 


5191 


040756 


010346 


5192 


040760 


010446 



MACY11 30A(1052) 14-JAN-81 
TRAP DECODER 

.S8TTL TRAP DECODER 



11 :36 



K 8 

PAGE 



101 



SEO 



•THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTION 
•AND USE IT TO INDEX THROUGH THE TRAP TA8LE FOR THE STARTING ADDRESS 
•OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
•GO TO THAT ROUTINE. 

;;SAVE RO 

;;GET TRAP ADDRESS 
; .-BACKUP Br 2 
;;GET RIGHT BYTE OF TRAP 
; .-POSITION FOR INDEXING 
;; INDEX TO TABLE 
;;G0 TO ROUTINE 



$TRAP: MOV 


RO.-(SP) 


MOV 


2(3P).R0 


TST 


-(RO) 


M0V8 


(RO).RO 


ASL 


RO 


MOV 


$TRPAD(RO),RO 


RTS 


RO 



000002 



;;THIS IS USE TO HANDLE THE "GETPRI" MACRO 
$TRAP2 



MOV 
MOV 
RTI 



(SP),-(SP) 
4(SP).2(SP) 



;;MOVE THE PC DOWN 
;;MOVE THE PSW DOWN 
; .-RESTORE THE PSW 



.S8TTL TRAP TABLE 



.-•THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
.-•8r THE "TRAP" INSTRUCTION. 



STRPAD: 



ROUTINE 

.WORD 

STYPE 

STYPOC 

$ TYPOS 

STYPON 

STYPDS 

$TYP8N 



$TRAP2 

.•;CALL=TYPE 

;;CALL=TYPOC 

;;CALL=TYPOS 

;;CALL=TYPON 

;;CALL=TYPDS 

;;CALL=TYP8N 



TRAP+1 (104401) 
TRAP*2( 104402) 
TRAP*3( 104403) 
TRAP*4( 104404) 
TRAP+5 (104405) 
TRAP*6( 104406) 



TTY TYPEOUT ROUTINE 

TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
TYPE OCTAL NU^BER (NO LEADING ZEROS) 
TYPE OCTAL NlfBER (AS PER LAST CALL) 
TYPE DECIMAL NUMBER (WITH SIGN) 
TYPE BINARY (ASCII) NUMBER 



SGTSWR ;;CALL=GTSWR TRAP*7( 104407) GET SOFT-SWR SETTING 



SCKSWR ;.-CALL=CKSWR 
SRDCHR ;;CALL=RDCHR 
SRDLIN ;;CALL=RDLIN 
SSAVREG ;;CALL=SAVREG 
SRESREG .-;CALL=RESREG 
.S8TTL POWER DOWN AND UP ROUTINES 



TRAP+1 0(1 04410) TEST FOR CHANGE IN SOFT-SWR 

TRAP+1 1(104411) TTY TYPEIN CHARACTER ROUTINE 

TRAP*12(104412) TTY TYPEIN STRING ROUTINE 

TRAP+13(104413) SAVE R0-R5 ROUTINE 

TRAP*14(104414) RESTORE R0-R5 ROUTINE 



000024 
000026 



••♦»•»♦»»♦»•♦••»••»••»♦•*•»••••*••••••****••**********••••••*•••* 

•POWER DOWN ROUTINE 

SPWRDN: MOV «ILLUP.a*PWRVEC ;;SET FOR FAST UP 
MOV <r340,a*PWRVEC*2 ;; PR 1 0:7 
MOV RO.-(SP) .-.-PUSH RO ON STACK 

MOV Rl.-(SP) .-.-PUSH Rl ON STACK 

MOV R2.-(SP) .-.-PUSH R2 ON STACK 

MOV R3.-(SP) .-.-PUSH R3 ON STACK 

MOV R4.-(SP) ;;PUSH R4 ON STACK 
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POWER DOWN AND UP ROUTINES 



5195 


A/ A7Z. *5 

040762 


A1 AC/ ^ 






5194 


040764 


01 7^46 


1 / A 1 C A 

1401 50 




5195 


040770 


A 1 A^ T 7 

010637 


Ay 1 1 1 
041 1 16 




5196 


040774 


ni 07T7 

012737 


Ay 1 AAiL 

04 1 006 


AAAA5/ 
00U02H 


5197 


A/ 1 Art'> 

041002 


AAA '\A A 

000000 






5198 


n/ 1 AA/ 

041004 


AAA77^ 

000776 
















5200 










5201 










5202 


A/ i AAZ 

041006 


A1 0717 

01 2737 


Ay 1115 
Oh M 1 c 


00002H 


5205 


Ay 1 A1 / 

041014 


A1 17AA. 

01 370o 


Ay 1 1 1 A 
Oh ' 1 1 6 




C OA 

5cO*» 


A/ 1 A OA 

041020 


AACA^ 7 
00 303 7 


A/ 1 1 1 

041 1 16 




5205 


A/ 1 A 

041024 


AAC377 

005237 


A/. 1 1 1 A 

Oh 1 1 1 6 




5206 


Ay i A7A 

041030 


AA1 T7C 

001 375 






5207 


Ay i ATO 

041032 


A1 0^77 

012677 


1 y A1 A5 

140102 




5c08 


Ay 1 A7^ 

04 1036 


A1 OilAC 

012005 






5c09 


Ay 1 Ay A 
041 040 


A1 Oii.A/ 

01 2604 






C Ol A 

5210 


Ay 1 Ay o 
041042 


A1 0iLA7 

012603 






521 1 


Ay 1 Ay y 
Oh 1 Ohs 


A1 0AA5 

01 2o02 






521c 


oy 1 Ay 
04 1 04o 


A1 OilAI 

01 2601 






coil 
521 5 


Ay 1 ACA 

0410^0 


A1 3AAn 

01 2oOO 






521*» 


A/ 1 

O** 1032 


A1 5777 


UhU' jh 


nnnn5A 

UUUUcH 


321 J 


Ay 1 (VIA 


ni 5777 


UUU jhU 


nnnn5A 

UUUUcO 


3216 


Ay 1 AiLiL 
04 1 06O 


1 OhhU 1 






j21 ' 


A/ 1 A7A 


nz. 1 1 5n 

Uh 1 1 cU 






JfTlO 


A/ 1 A70 

04 1 U /^2 


A1 571 A 

012716 






j21 V 


Ay 1 A 7/ 
0*» 1 U ^ H 


A 5 A/ 






til A 

5220 


A/ 1 A7X. 
U41 Of O 


A/ 57AA 


00002U 


5221 


Ay 1 1 A/ 
04 1 1 04 


AACA77 

00503/^ 


n7/ 57A 




JCCC 


A/ 1 1 1 A 

Oh 1 1 1 0 


AAAAA5 

000002 






3223 


Ay 1 1 1 5 
0»» 1 112 


AAAAAA 

000000 






322h 


A/ 1 1 1 A 

0*» 1 1 1 *» 


OOOf f 0 






3225 


n/ 1 1 1 A 


uouuuu 






C30A 

322o 


A/ 1 1 OA 

Oh 1 1 20 


AAAZ. 1 5 

006H 1 c 


UjUUhU 


n'»7'>i 7 


3c c' 


AZ 1 1 
wH 1 1 cO 


nil ini 


04^040 

V/H JvH V 


044501 


5228 
5229 


041134 


052514 


042522 


026440 


041142 


051040 


051505 


040524 


5230 


041150 


052122 


047111 


020107 


5231 


041156 


006412 


000 




5232 




041162 






5233 










5234 











MOV 

MOV 

MOV 

MOV 

HALT 

8R 



R5.-(SP) 
aSWR,-(SP) 
SP.$SAVR6 
#$PWRUP.S*PWRVEC 

.-2 



102 



PUSH R5 ON STACK 
PUSH aSWR ON STACK 
SAVE SP 

.-SET UP VECTOR 



fO 010? 



;;HANG UP 



UP ROUTINE 



CpUDi ID * 


MOV 


#$iLLUP.a/ifPWRVEC 




MOV 


SSAVR6 SP 




CLR 


SSAVR6 


IS- 


INC 


$SAVR6 




BNE 


1$ 




MOV 


(SP)-^.SSWR 




MO\f 


(SP)*,R5 




MOV 


(SP)+,R4 




MOV 


(SP)+.R3 




MOV 


(SP)*.R2 




MOV 


(SP)*.R1 




MOV 


(SP)*.RO 




MOV 


/tr$PWRDN,aJtrPWRVEC 




MOV 


#340.a#PWRVEC*2 




TYPE 




SPURMG: 


.WORD 


PWRMSG 




MOV 


(PC)+,(SP) 
RESTRT 


SPWRAD : 


.WORD 




BIC 


*20,2(SP) 




CLR 


$T8IT 




RTI 




SILLUP: 


HALT 






BR 


.-2 


$SAVR6: 


0 




PWRMSG: 


.ASCIZ 


<12><15>? POWER 



;SET FOR FAST DOWN 
GET SP 

WAIT LOOP FOR THE TTY 
WAIT FOR THE INC 
OF WORD 

POP STACK INTO aSWR 

POP STACK INTO R5 

POP STACK INTO R4 

POP STACK INTO R3 

POP STACK INTO R2 

POP STACK INTO R1 

POP STACK INTO RO 

;SET UP THE POWER DOWN VECTOR 

PRI0:7 

REPORT THE POWER FAILURE 

POWER FAIL MESSAGE POINTER 

RESTART AT RESTRT 

RESTART ADDRESS 

CLEAR "T" BIT 

CLEAR THE '7" BIT FLAG 



THE POWER UP SEQUENCE WAS STARTED 
BEFORE THE POWER DOWN WAS COMPLETE 
PUT THE SP HERE 
FAILURE - RESTARTING ?<12><15> 



.EVEN 



'■jKDADO kTFII- 
rjuDAD.Pn 



•AA mu DIAG 
19-DEC-80 11:05 



(1ACV11 30A(1052) K-JAN-81 
ERROR MESSAGES, DATA 



M 8 

11:36 PAGE 103 
HEADERS-TABLES & FORMATS 



SEO 0105 



5255 

5236 

5237 

5238 

5239 

5240 

5241 

5242 

5245 

5244 

5245 

5246 

5247 

5248 

5249 

5250 

5251 

5252 

5253 

5254 

5255 

5256 

5257 

5258 

5259 

5260 

5261 

5262 

5263 

5264 

5265 

5266 

5267 

5268 

5269 

5270 

5271 

5272 

5273 

5274 

5275 

5276 

5277 

5278 

5279 

5280 

5281 

5282 

5283 

5284 

5285 

5286 

5287 

5288 

5289 

5290 



041162 

041170 

041176 

041204 

041212 

041220 

041222 

041230 

041236 

041244 

041252 

041260 

041266 

041271 

041276 

041304 

041312 

041320 

C41326 

041330 

041336 

041344 

041352 

041360 

041363 

041370 

041376 

041404 

041412 

041420 

041426 

041434 

041456 

041444 

041452 

041460 

041466 

041474 

041502 

041503 

0<«1510 

041516 

041524 

041552 

041540 

041541 

041546 

041554 

041562 

041570 

041576 

041604 

041605 

041612 

041620 



047125 
052105 
052520 
020120 
0415*7 
00OC64 
0'/125 
032105 
046505 
052115 
050101 
047514 
030065 
120 
052111 
051524 
053440 
044440 
000127 
047515 
052111 
020124 
020107 
053523 
104 
042101 
044523 
052105 
044040 
041040 
047440 
000127 
042515 
051040 
047101 
054502 
044524 
042523 
000 
101 
051117 
052115 
027107 
042105 
000 
123 
054522 
042515 
046507 
045505 
042515 
000 
115 
043515 
042522 



C54105 
042105 
052040 
047524 
020056 

054105 
042105 
020056 
020056 
052040 
027105 
000 
044522 
020131 
051440 
047522 
020116 

042504 
020123 
051127 
047111 
000 
040525 
051104 
043516 
042527 
025111 
052131 
020106 

047122 
020066 
042507 
053440 
043516 
020122 

046440 
020131 
020056 
052040 
047440 

046525 
047440 
027115 
027124 
020056 
052517 

046505 
052115 
027107 



042520 
041440 
040522 
046040 
030060 

042520 
046440 
043515 
051124 
020117 
031040 

051117 
044502 
052105 
043516 
051520 

041040 
042523 
047117 
050040 

020114 
051505 
041040 
047105 
047514 
051505 
051520 

046105 
044103 
020104 
044522 
052440 
033122 

046505 
043515 
042522 
046511 
052125 

040515 
020106 
046440 
051040 
044524 
051524 

020056 
020056 
053440 



.S8TTL 
EMI : 



EM2: 



EM3: 



EM4: 



EMS: 



EM6: 



EM7: 



EM10; 



ERROR MESSAGES. DATA HEADERS-TABLES & FORMATS 
.ASCIZ /UNEXPECTED CPU TRAP TO LOC. 004/ 



.ASCIZ /UNEXPECTED MEM. MGMT. TRAP TO LOC. 250/ 



.ASCIZ /PRIORITY BITS SET WRONG IN PSW/ 



.ASCIZ /MODE BITS SET WRONG IN PSW/ 



.ASCIZ /DUAL ADDRESSING BETWEEN HI8L0 BYTES OF PSW/ 



.ASCIZ /KERNEL R6 CHANGED BY WRITING USER R6/ 



.ASCIZ /A MEMORY MGMT. REG. TIMED OUT/ 



, ASCIZ /SUMMARY OF MEM. MGMT. REG. TIMEOUTS/ 



EMU 



.ASCIZ /MEM. MGMT. REG. WOULD NOT CLEAR/ 



CJKDADO KTF11-AA MMU DIAG 
CJKDAD.PH 19-DEC-80 11:05 



MACm 30A(1052) U-JAN-81 
ERROR message:, DATA 



N 8 

11:36 PAGE 104 
HEADERS-TABLES £ FORMATS 



SEO 0104 



5291 

5292 

5293 

5294 

5295 

5296 

5297 

5298 

5299 

5300 

5301 

5302 

5303 

5304 

5305 

5306 

5307 

5508 

5309 

5310 

5311 

5312 

5313 

5314 

5315 

5316 

5317 

5318 

5319 

5320 

5321 

5322 

5323 

5324 

5325 

3326 

5 3? 7 

5328 

5329 

5330 

5331 

5332 

5333 

5334 

5335 

5336 

5337 

5338 

5339 

5340 

5341 

5342 

5343 

5344 

5345 

5346 



041626 

041634 

041642 

041645 

041652 

041660 

041666 

041674 

041702 

041710 

041714 

041722 

041730 

041736 

041744 

041751 

041756 

041764 

041772 

042000 

042004 

042012 

042020 

042026 

042034 

042042 

042050 

042056 

042060 

042066 

042074 

042102 

042110 

042116 

042122 

042130 

0421 36 

042144 

042152 

042160 

042166 

042174 

042202 

042210 

042216 

042224 

042232 

042240 

042246 

042254 

042262 

042267 

042274 

042302 

042310 

042316 



0525 V 
052117 
051101 

115 
043515 
042522 
052111 
020124 
047503 
046124 
051123 
042506 
041040 
052111 
050040 

123 
042111 
051040 
046101 
047522 
052504 
042104 
047111 
053524 
054502 
043117 
047440 
000122 
052504 
042104 
047111 
053524 
040520 
023522 
044(20 
046101 
042522 
051117 
051127 
044120 
042101 
047506 
053440 
044440 
047514 
046440 
026527 
044504 
020124 
042523 
050040 

127 
051440 
020116 
052040 
047117 



042114 
C41440 
000 
046505 
052115 
027107 
020123 
042523 
051122 
000131 
020060 
052103 
020131 
020105 
053523 
030522 
047040 
040505 
020114 
000123 
046101 
042522 
020107 
042505 
042524 
050040 
020122 

046101 

042522 

020107 

042505 

026522 

000123 

051531 

040440 

051523 

042515 

047117 

051531 

051104 

046522 

047522 

020116 

040503 

042117 

044502 

020104 

042507 

020124 

051104 

041055 

052105 

047515 

040510 

020105 



047040 
042514 

02GC56 
020056 
041040 
047516 
020124 
041505 

043105 
042105 
051127 
047524 
000 
042040 
052117 
020104 
042532 

040440 
051523 
042502 
020116 
020123 
051101 
042120 

040440 
051523 
042502 
020116 
042120 

041511 
042104 
043040 
020104 
000107 
020056 
020056 
042105 
043516 
042522 
042524 
000105 
020124 
047516 
020124 
047111 
000 
052111 
044440 
042522 
020116 
042120 



EM12: 



EMI 3: 



EM14; 



EMI 5; 



EM16: 



EM20: 



EM21 



EM22; 



.ASCJZ /MEM. MGMT. REG. BITS NOT SET CORREdLr/ 



.ASCIZ /SRO EFFECTED BY JRJTE TO PSW/ 



.ASCJZ /SRI DID NOT READ ALL ZEROS/ 



.ASCiZ /DUAL ADDRESSING BETWEEN BYTES OF PAR OR PDR/ 



.ASCIZ /DUAL ADDRESSING BETWEEN PAR-PDR'S/ 



EMI 7: .ASCIZ /PHYSICAL ADDRESS FORMED WRONG/ 



.ASCIZ /PHYS. ADDR. FORMED WRONG IN RELOCATE MODE/ 



.ASCJZ /W-8JT DID NOT GET SET IN PDR/ 



.ASCJZ /W-8IT SET IN MORE THAN ONE PDR/ 



CJtcDAOO kTFII-AA mmu djag 
fJKDAD.Pn 19-DEC-80 11:05 



B 9 

MAC VII 30A(1052) U-JAN-81 11:36 PAGE 105 

ERROR MESSAGES, DATA HEADERS-TABLES ft FORMATS 



EO 0105 



53A7 

55A8 

53^9 

5350 

5351 

5352 

5353 

5354 

5355 

5356 

5357 

5358 

5359 

5360 

5361 

5362 

5363 

536A 

5365 

5366 

5367 

5368 

5369 

5370 

5371 

5372 

5373 

5374 

5375 

5376 

5377 

5378 

5379 

5380 

5381 

5382 

5383 

5384 

5385 

5386 

5387 

5388 

5389 

5390 

5391 

5392 

5393 

5394 

5395 

5396 

5397 

5398 

5399 

5400 

5401 

5402 



042324 
042326 
042334 
042342 
042350 
042356 
042364 
04237? 
042400 
042406 
042414 
042422 
042430 
042432 
042440 
042446 
042454 
042462 
042470 
042475 
042502 
042510 
042516 
042524 
042532 
042540 
042545 
042552 
042560 
042566 
042574 
042602 
042610 
042614 
042622 
042630 
042636 
042644 
042652 
042660 
042666 
042674 
042702 
042710 
042716 
042724 
042732 
042733 
042740 
042746 
042754 
042762 
042770 
042776 
043004 
043012 



000122 
026527 
047516 
040505 
054502 
044524 
020117 
051127 
020107 
042523 
044502 
045440 
000067 
026527 
047507 
020124 
043516 
047505 
047502 

115 
020131 
020056 
051523 
052122 
047040 
041503 

101 
020123 
020122 
047516 
051117 
052123 
047511 
051123 
020104 
042522 
040440 
020123 
020122 
041505 
044504 
020124 
050125 
042522 
051111 
040440 

000 

120 
043514 
041101 
041517 
042105 
020116 
047510 
052047 
000105 



044502 
020124 
042522 
053440 
043516 
042120 
052111 
051123 
020124 
020124 
050111 

044502 
020124 
052504 
052040 
052125 
052122 
046505 
043515 
041501 
040440 
042040 
052117 
051125 
041503 
051105 
044504 
020124 
020124 
052522 
000116 
020060 
047516 
047520 
041503 
051105 
047503 
046124 
020104 
047514 
041440 
052103 
052524 
042104 

043501 
044124 
051117 
052503 
053440 
052111 
046125 
044040 



020124 
046103 
020104 
044522 
052040 
000122 
047111 
020060 
026527 
047111 
051104 

020124 
042523 
044522 
046511 
040440 

000 
051117 
052115 
042503 
047502 
042111 
047440 

000 
051505 
047522 
020104 
041101 
047111 
052103 

044504 
020124 
052122 
051505 
047522 
051122 
000131 
047516 
045503 
051117 
053040 
046101 
027122 

020105 
020056 
020124 
051122 
042510 
051440 
047104 
053101 



EM23: 



EM24: 



EM25: 



EM26: 



EM27: 



EM30: 



EM31 



EM32: 



.ASCI 2 /W-8IT NOT CLEARED BY WRITING TO PDR/ 



.ASCIZ /WRITING SRO SET W-8IT IN KIPDR7/ 



.ASCIZ /W-8IT GOT SET DURING TIMEOUT ABORT/ 



.ASCIZ /MEMORY MGMT. ACCESS ABORT DID NOT OCCUR/ 



.ASCIZ /ACCESS ERROR DID NOT ABORT INSTRUCTION/ 



.ASCIZ /SRO DID NOT REPORT ACCESS ERROR CORRECTLY/ 



.ASCIZ /DID NOT LOCKUP CORRECT VIRTUAL ADDR./ 



.ASCIZ /PAGE LGTH. .'aBORT OCCURRED WHEN IT SHOULDN'T HAVE/ 



CJKDADO KTfll-AA mj DIAG 
rjKDAD.PII 19-DEC-80 11:05 



C 9 

KWCm 30A(105?> U-JAN-81 11:36 PAGE 106 

ERROR MESSAGES. DATA HEADERS- TABLES ft FORMATS 



SEO 0106 



5405 

5405 

5406 

5407 

5408 

5409 

5410 

5411 

5412 

5413 

54K 

5415 

5416 

5417 

5418 

5419 

5420 

5421 

5422 

5423 

5424 

5425 

5426 

5427 

5428 

5429 

5430 

5431 

5432 

5433 

5434 

5435 

5436 

5437 

5438 

5439 

5440 

5441 

5442 

5443 

5444 

5445 

5446 

5447 

5448 

5449 

5450 

5451 

5452 

5453 

5454 

5455 

5456 

5457 

5458 



043014 

043022 

043030 

043036 

043044 

043052 

043060 

043066 

043074 

043077 

043104 

C43112 

043120 

043126 

043134 

043142 

043150 

043155 

043162 

C43170 

043176 

043204 

043212 

043220 

043222 

043230 

043236 

043244 

043252 

043260 

043266 

043271 

043276 

043304 

043312 

043320 

043324 

043332 

043340 

043346 

043354 

043362 

043363 

043370 

043376 

043404 

043412 

043420 

043426 

043432 

043440 

043446 

043454 

043462 

043470 

043476 



040520 
052107 
047502 
0421 1 1 
047440 
053440 
052111 
046125 
042526 

123 
0421 1 1 
051040 
020124 
046040 
040440 
041440 
052103 

123 
020122 
044103 
020104 
051440 
020104 
000124 
051123 
051440 
051105 
020124 
052105 
040440 
052105 

123 
052117 
045503 
047503 
046124 
044504 
020124 
052040 
042513 
051440 

000 

113 
047522 
020124 
041511 
020116 
052517 
047522 
051123 
051440 
040510 
041040 
042515 
051105 
051105 



042507 
027110 
052122 
047040 
041503 
042510 
051440 
020104 
000 
030122 
047040 
050105 
040520 
052107 
047502 
051117 
054514 
030122 
051123 
047101 
054502 
041505 
041101 

020060 
031122 
020105 
051042 
020042 
051040 
000 
031122 
052040 
047111 
051122 
000131 
020104 
051124 
051110 
047122 
040520 

020124 
020122 
042523 
042105 
044524 
020124 
000122 
020060 
031122 
043516 
020] 31 
052517 
047522 
047522 



046040 
040440 
042040 
052117 
051125 
020116 
047510 
040510 

042040 
052117 
051117 
042507 
027110 
052122 
042522 
000 
047440 
020062 
042507 
040440 
047117 
051117 

051117 
053440 
047516 
051505 
054502 
051505 

047040 
040522 
020107 
041505 

047516 
050101 
020125 
046105 
042503 

051105 
047516 
053122 
047440 
042515 
051105 

051117 
041440 
042105 
044524 
020124 
000122 
020122 



FM33: 



.ASCIZ /PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE/ 



EM34: 



EM37: 



EM40: 



EM41: 



EM42: 



EM43: 



EM44: 



EM45: 



.ASCIZ /Sr-«0 DID NOT REPORT PAGE LGTH. ABORT CORRECTLY/ 



.ASCIZ /SRO OR SR2 CHANGED BV A SECOND ABORT/ 



.ASCIZ /SRO OR SR2 WERE NOT 'RESET" BV A RESET/ 



.ASCIZ /SR2 NOT TRACKING CORRECTLY/ 



.ASCIZ /DID NOT TRAP THRU KERNEL SPACE/ 



.ASCIZ /KT ERROR NOT SERVICED ON TIMEOUT ERROR/ 



.ASCIZ /SRO OR SR2 CHANGED BY TIMEOUT ERROR/ 



.ASCIZ /ERROR DURING "DOUBLE ERROR" (KT ft TIMEOUT)/ 



CJKDADO KTFll-AA MMU DIAG 
rjKDAD.Pn 19-DEC-80 11:05 



5A59 

5460 

5461 

5462 

5463 

5464 

5465 

5466 

5467 

546« 

5469 

5470 

5471 

5472 

5473 

5474 

5475 

5476 

5477 

5478 

5479 

5480 

5481 

5482 

5483 

5484 

5485 

5486 

5487 

5488 

5489 

5490 

5491 

5492 

5493 

5494 

5495 

5496 

5497 

5498 

5499 

5500 

5501 

5502 

5503 

5504 

5505 

5506 

5507 

5508 

5509 

5510 

5511 

5512 

5513 

5514 



043504 
043512 
043520 
043526 
043534 
043542 
043550 
043551 
043556 
043564 
043572 
043600 
043606 
043614 
043622 
043630 
043636 
045644 
043652 
C43657 
043664 
043672 
043700 
04 3 706 
043714 
043715 
043722 
043730 
043736 
043744 
043752 
043760 
043766 
043773 
044000 
044006 
044014 
044022 
044030 
044036 
044044 
044051 
044056 
044064 
044072 
044100 
044106 
044114 
044122 
044130 
044136 
044144 
044152 
044160 
044166 
044174 



052504 
021040 
042514 
051117 
020124 
042515 

000 

115 
047111 
052103 
052520 
053440 
042040 
052115 
051516 
044524 
040517 
051127 
040504 

123 
047040 
051525 
054502 
026511 

000 

113 
020114 
040440 
020123 
040505 
052440 
046440 
052115 

127 
050040 
051040 
047105 
044127 
047111 
041517 
047515 

115 
047111 
052103 
052520 
053440 
042040 
052123 
047516 
044123 
020131 
046455 
040520 
050040 
040510 
041040 



044522 
C47504 
042440 
020042 
020046 
052517 

050106 
052123 
047511 
044123 
047522 
052101 
044520 
051124 
047117 
042504 
047117 
040524 
040524 
052117 
042510 
046440 
052115 

051105 
040520 
041503 
047111 
020104 
042523 
050106 
044520 
047522 
051104 
043105 
042503 
046111 
051040 
052101 
042504 
050106 
052123 
047511 
044123 
047522 
052101 
041501 
020124 
042105 
043115 
050124 
020122 
051104 
043516 
020131 



D 9 

MACYll 30A(1052) 14-JAN-81 11:36 PAGE 107 

ERROR MESSAGES, DATA HEADERS-TABLES & FORMATS 

043516 
041125 
051122 
045450 
044524 
024524 



SEO 0107 



0201 1 1 
052522 
020116 
042105 
043516 
000101 
044440 
041525 
046040 
020104 
020107 
000 
04';503 
050040 
020104 
050106 
044520 

042516 
042507 
051505 
052123 
043117 
035122 
026511 

000 
043516 
051447 
051105 
020104 
020105 
046105 
020105 

000 
020104 
05252? 
020116 
042105 
043516 
000101 
020113 
052520 
041040 
042120 
000104 
051117 
041440 
042105 
020101 



EM46: 



EM47: 



EM50: 



EM51: 



.ASCIZ /MFPI INSTRUCTION PUSHED WRONG DATA/ 



.ASCIZ /MTPI INSTRUCTION LOADED WRONG DATA/ 



.ASCIZ /STACK NOT PUSHED BY MfPJ-MTPI/ 



.ASCIZ /KERNEL PAGE ACCESS INSTEAD OF USER: MFPI-MTPI/ 



EM52: 



.A^CIZ /WRONG PDR'S REFERENCED WHILE IN RELOCATE MODE/ 



EM53: 



EM54: 



EM55: 



.ASCIZ /MFPD INSTRUCTION PUSHED WRONG DATA/ 



.ASCIZ /STACK NOT PUSHED BY MFPD-MTPD/ 



.ASCIZ /PAR OR PDR CHANGED BY A RESET/ 



E 9 

C.KDADO KTFn-AA MMU DIAG fVVCvn 50A(1052) H-JAN-81 11:36 PAGE 108 

rjUDAD.PIl 19-DEC-80 11:05 ERROR MESSAGES, DATA HEADERS- TABLES I FORMATS 



SEO 0108 



5515 

5516 

5517 

5518 

5519 

5520 

5521 

5522 

5523 

552A 

5525 

552c 

5527 

5528 

5529 

5530 

5531 

5532 

5533 

553A 

5535 

5536 

5537 

5538 

5539 

55AO 

55A1 

55A2 

5543 

55AA 

5545 

5546 

5547 

5548 

5549 

5550 

5551 

5552 

5553 

5554 

5555 

5556 

5557 

5558 

5559 

5560 

5561 

5562 

5563 

5564 

5565 

5566 

5567 

5568 

5569 

5570 



044202 
0442^0 
044216 
044224 
044232 
044240 
044246 

044253 
044260 
044266 
044274 
044302 
044310 
044316 
044323 
044330 
044336 
044344 
04435? 
044360 
044366 
044374 
044402 
044410 
044413 
044420 
044426 
044434 
044442 
044450 
044453 
044460 
044466 
044474 
044502 
044503 
044510 
044516 
044524 
044532 
044533 
044540 
044546 
044554 
044562 
044570 
044576 
044603 
044610 
044616 
044624 
044632 
044640 
044641 
044646 



042522 
051520 
047101 
054502 
052122 
052440 
047515 

117 
020103 
050040 
020066 
052040 
0201 1 7 
051117 

117 
020103 
050040 
020066 
051440 
020040 
020040 
051505 
042440 
041520 

127 
020040 
020104 
051505 
042440 
041520 

101 
051523 
047124 
051122 

000 

122 
042524 
051104 
046525 

200 

101 
020104 
042105 
04651 1 
052040 
020117 
051117 

122 
051124 
020104 
040505 
047111 

200 

101 
051523 



042523 
020127 
042507 
040440 
020111 
042523 
042504 

042114 
047440 
053523 
040527 
051505 
042440 
041520 
042114 
047440 
053523 
040527 
030122 
051440 
020040 
047124 
051122 

000 
047522 
051040 
020040 
047124 
051122 

000 
042104 
052040 
020117 
051117 

043505 
026522 
020123 
020040 

042116 
047440 
020040 
052517 
051505 
042440 
041520 
043505 
051040 
020040 
026504 
051101 

042104 
024040 



000124 
044103 
020104 
020116 
047111 
020122 
000 

050040 
042114 
051040 
020123 
047124 
051122 
000 
050040 
042114 
051040 
020123 
020040 
031122 
052040 
020117 
051117 

042524 
040505 
052040 
0201 1 7 
051117 

042522 
051505 
042440 
041520 

051511 
042101 
047040 
043117 

042455 
026522 
052040 
051524 
047124 
051122 
000 
051511 
040505 
051040 
041050 
024531 

042522 
0415"' 7 



EM56: 



.ASCIZ /PSW CHANGED BY AN RTI IN USER MODE/ 



DHl 



DH2: 



DH3: 



DH7: 



DHIO: 



DH11 



.ASCJ2 /OLD PC OLD PSW R6 WAS TESTNO ERRORPC/ 



.ASCIZ /OLD PC OLD PSW R6 WAS SRO SR2 TESTNO ERRORP'"/ 



.ASCJZ /WROTE READ TESTNO ERRORPC/ 



.ASCIZ /ADDRESS TESTNO ERRORPC/ 



.ASCII /REGiSTER-ADDRS NUM OF/<CRLF> 



.ASCIZ /AND-ED OR-ED TIMOUTS TESTNO ERRORPC/ 



.ASCII /REGISTR READ READ- (BINARY) /<CRLF> 



.ASCIZ /ADDRESS (OCTAL) 5432109876543210 TESTNO ERRORPC/ 



cjkdado ktfii-aa m) diag 

CJ>;DAD.P11 19-DEC-80 11:05 



5571 

5572 

5573 

5574 

5575 

5576 

5577 

5578 

5579 

5580 

5581 

5582 

5583 

5584 

5585 

5586 

5587 

5588 

5589 

5590 

5591 

5592 

5593 

5594 

5595 

5596 

5597 

5598 

5599 

5600 

5601 

5602 

5603 

5604 

5605 

5606 

5607 

5608 

5609 

5610 

5611 

5612 

5613 

5614 

5615 

5616 

5617 

5618 

5619 

5620 

5621 

5622 

5623 

5624 

5625 

5626 



044654 

044662 

044670 

044676 

044704 

044712 

044720 

044723 

044730 

044736 

044744 

044752 

044760 

044766 

044771 

044776 

045004 

045012 

045020 

C45026 

045034 

045042 

045050 

045056 

045063 

045070 

045076 

045104 

045112 

045113 

045120 

045126 

045133 

045140 

045146 

045154 

045162 

045170 

045176 

045204 

045212 

045213 

045220 

045226 

045233 

045240 

045246 

045254 

045262 

045270 

045276 

045303 

045310 

045316 

045324 

045331 



040524 
031464 
033470 
030462 
051505 
042440 
041520 

122 
051124 
042524 
040505 
051040 
OA 1050 
024531 

101 
051523 
040524 
041517 
032440 
034460 
031464 
052040 
0201 1 7 
051117 

122 
020040 
047124 
051122 

000 

120 
051104 
050055 

103 
042105 
041505 
050130 
051040 
042126 
047124 
051122 

000 

120 
046103 
052524 

101 
051523 
042522 
050111 
052040 
0201 1 7 
051117 

120 
046103 
032040 
051101 

101 



024514 
030462 
032466 
020060 
047124 
051122 

000 
043505 
053440 
020040 
020104 
040505 
047111 

200 
042104 
024040 
024514 
040524 
031464 
033470 
030462 
051505 
042440 
041520 
040505 
052040 
020117 
051117 

051101 
050040 
051104 
042514 
042440 
042124 
041505 
041505 
052040 
020117 
051117 

054510 
053040 
046101 
042104 
040440 
051523 
051101 
051505 
042440 
041520 
054510 
050040 
020040 
032440 
042104 



I«1ACY11 30A(1052) 14-JAN-81 
ERROR MESSAGES. DATA 

032440 
034460 
031464 
052040 
020117 
051117 



F 9 
11:36 PAGE 109 
HEADERS-TABLES ft FORMA FS 



SEO 0109 



051511 
047522 
0510^0 
020040 
026504 
051101 

042522 
041517 
024040 
024514 
030462 
032466 
020060 
047124 
051122 
000 
020104 
051505 
042440 
041520 

050055 
051101 
200 
051101 
043106 
042440 
042124 
044505 
051505 
042440 
041520 

044523 
051111 

200 
042522 
042104 
045440 
020064 
047124 
051122 

000 
044523 
051101 
050040 

200 
042522 



DH12: 



.ASCII /REGISTR WROTE READ READ- (BINARY) /<CRLF> 



DH13: 



DH16: 



DH17: 



DH20: 



.ASCIZ /ADDRESS (OCTAL) (OCTAL) 5432109876543210 TESTNO ERRQRPC/ 



.ASCIZ /READ TESTNO ERRQRPC/ 



.ASCII /PAR-POR PAR-PDR/<CRLF> 



.ASCIZ /CLEARED EFFECTD EXPECTD RECEIVD TESTNO ERRQRPC/ 



.ASCII /PHYSICL VIRTUAL/<CRLF> 



.ASCIZ /ADDRESS ADDRESS KIPAR4 TESTNO ERRORPC/ 



.ASCII /PHYSICL PAR 4 PAR 5/<CRLF> 



.ASCIZ /ADDRESS VBA VBA PAR 4 PAR 5 PSW TESTNO ERRQRPC/ 



CJKDADO KTF11-AA mj DIAG 
rjKDAD.Pn 19-DEC-80 11:05 



56? 7 

5628 

56?9 

5650 

5631 

5632 

5633 

563A 

5635 

5636 

5637 

5633 

5639 

5640 

5641 

5642 

5643 

5644 

5645 

5646 

5647 

5648 

5649 

5650 

5651 

5652 

5653 

5654 

5655 

5656 

5657 

5658 

5659 

5660 

5661 

5662 

5663 

5664 

5665 

5666 

5667 

5668 

5669 

5670 

5671 

5672 

5673 

5674 

5675 

5676 

5677 

5678 

5679 

5680 

5681 

5682 



045336 

045344 

045352 

045360 

045366 

045374 

045402 

045410 

045416 

045424 

045431 

045436 

045444 

045451 

045456 

043464 

045472 

045500 

045506 

C45511 

045516 

045524 

045532 

045540 

045546 

045554 

045562 

045570 

045576 

045604 

045610 

045616 

045624 

045632 

045640 

045646 

045654 

045662 

045670 

045676 

045700 

045706 

045714 

045722 

045730 

045736 

045740 

045746 

045754 

045762 

045770 

045776 

046004 

046012 

046020 

046026 



051523 
020040 
040502 
050040 
020040 
032440 
053523 
052040 
020117 
051117 

120 
020040 
052524 

124 
020104 
042522 
051505 
042440 
041520 

120 
0201^6 
02004U 
051111 
051105 
020040 
042105 
051104 
042524 
020040 
050122 
042120 
020040 
047516 
047522 
042120 
020123 
052103 
052123 
051105 
000103 
042120 
020040 
020040 
052123 
051105 
000103 
051123 
020123 
052103 
020122 
051520 
020040 
047516 
047522 
051123 
020123 



053040 
C20040 
020040 
051101 
050040 
020040 
020040 
051505 
042440 
041520 
051104 
053040 
046101 
051505 
040440 
051523 
047124 
051122 
000 
051104 
050040 
020040 
052524 
047522 
042524 
020040 
051505 
052123 
051105 
000103 
020122 
042524 
020040 
050122 
020122 
054105 
020104 
047516 
047522 

020122 
051520 
020040 
047516 
047522 

020060 
054105 
020104 
020064 
020127 
042S24 
020040 
050122 
020062 
054105 
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040502 
053040 
020040 
032040 
051101 
050040 
020040 
047124 
051122 
000 

020040 DH21 : 
051111 
200 
042524 
042104 
052040 
020117 
051117 



044440 
051104 
053040 
046101 
020122 
052123 
042101 
020123 
047516 
047522 

020040 
052123 
051105 
000103 
040527 
042520 
042524 
020040 
050122 

020064 
020127 
042524 
020040 
050122 

040527 
042520 
042120 
020040 
020040 
052123 
051105 
000103 
040527 
042520 



DH22: 



DH23: 
DH24: 

DH26: 

DH30: 



.ASCII /PDR VIRTUAL/<CRLF> 



.ASCIZ /TESTED ADDRESS TESTNO ERRORPC/ 



.ASCII /PDR IN PDR VIRTUAL/ 



.ASCIZ /ERROR TESTED ADDRESS TESTNO ERRORPC/ 



.ASCIZ /PDR TESTNO ERRORPC/ 



.ASCIZ /PDR WAS EXPECTD TESTNO ERRORPC/ 



.ASCIZ /PDR 4 PSW TESTNO ERRORPC/ 



.ASCIZ /SRO WAS EXPECTD PDR 4 PSW TESTNO ERRORPC/ 



DH31: 



.ASCIZ /SR2 WAS EXPECTD PDR 4 PSW TESTNO ERRORPC/ 



H 9 

CJKDADO kTFU-AA M«1U DIAG IIACVII 30A(1052) U-JAN-81 11:36 PAGE 111 

fJKDAD.PII 19-DEC-80 11:05 ERROR MESSAGES. DATA HEADERS- TABLES t FORMATS 



SEO Gin 



5683 

568A 

5685 

5686 

5687 

5688 

5689 

5690 

5691 

5692 

5693 

569^ 

5695 

5696 

5697 

5698 

5699 

5700 

5701 

5702 

5703 

570^ 

5705 

5706 

5707 

5708 

5709 

5710 

5711 

5712 

5713 

57K 

5715 

5716 

5717 

5718 

5719 

5720 

5721 

5722 

5723 

5724 

5725 

5726 

5727 

5728 

5729 

5730 

5731 

5732 

5733 

5734 

5735 

5736 

5737 

5758 



046034 
046042 
046050 
046056 
046064 
0460/'2 
046100 
046106 
046114 
046122 
0461 30 
046136 
046144 
046152 
046160 
046166 
0461 74 
046202 
046210 
C46216 
046220 
046226 
046234 
046242 
046250 
046256 
046264 
046272 
046300 
046306 
046314 
046322 
046330 
046336 
046344 
046352 
046360 
046366 
046374 
046402 
046410 
046416 
046420 
046426 
046434 
046442 
046450 
046455 
046462 
046470 
046476 
046504 
046512 
046520 
046526 
046534 



052103 
020122 
051520 
020040 
047516 
047522 
027126 
020040 
032122 
020060 
051123 
020123 
047516 
047522 
027126 
020040 
032122 
052123 
051105 
000103 
027126 
020040 
032122 
020060 
054105 
020104 
047516 
047522 
027126 
020040 
032122 
020062 
054105 
020104 
047516 
047522 
051123 
020123 
052103 
052123 
051105 
000103 
044506 
041101 
020040 
047503 
047502 

123 
051501 
053440 
030122 
051440 
051501 
047124 
051122 

000 



020104 
020064 
020127 
042524 
020040 
050122 
027102 
044513 
020040 
040527 
020062 
042524 
020040 
050122 
027102 
044513 
020040 
047516 
047522 

027102 
044513 
020040 
040527 
042520 
042524 
020040 
050122 
027102 
044513 
020040 
040527 
042520 
042524 
020040 
050122 
020062 
054105 
020104 
047516 
047522 

051522 
051117 
020040 
042116 
052122 
030122 
051440 
051501 
053440 
031122 
052040 
020117 
051117 



042120 
020040 
020040 
052123 
051105 
000103 
027101 
042120 
051123 
020123 
040527 
052123 
051105 
000103 
027101 
042120 
042524 
020040 
050122 

027101 

042120 

051123 

020123 

052103 

052123 

051105 

000103 

027101 

042120 

051123 

020123 

052103 

052123 

051105 

000103 

040527 

042520 

042524 

020040 

050122 

020124 
020124 
042523 
040440 
200 
053440 
031122 
051440 
051501 
053440 
051505 
042440 
041520 



DH32: 



DH33; 



DH34: 



DH35; 



DH36: 



DH37: 



.ASCIZ /V.8.A. KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC/ 



.ASCIZ /V.8.A. KIPDR4 TESTNO ERRORPC/ 



.ASCIZ /V.8.A. KIPDR4 SRO WAS EXPECTD TESTNO ERRORPC/ 



.ASCIZ /V.8.A. KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC/ 



.ASCIZ /SR2 WAS EXPECTD TESTNO ERRORPC/ 



.ASCII /FIRST ABORT SECOND ABORT/<CRLF> 



.ASCIZ /SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC/ 



CJKDADO KTF11-AA MMU DIAG 
'JKDAD.P11 19-DEC-80 11:05 



I 9 
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ERROR MESSAGES. DATA HEADERS-TABLES t FORMATS 



SEO 0^ 



5759 

57A0 

5741 

5742 

5743 

5744 

5745 

5746 

5747 

5748 

5749 

5750 

5751 

5752 

5753 

5754 

5755 

5756 

5757 

5758 

5759 

5760 

5761 

5762 

5763 

5764 

5765 

5766 

5767 

5768 

5769 

5770 

5771 

5772 

5773 

5774 

5775 

5776 

5777 

5778 

5779 

5780 

5781 

5782 

5783 

5784 

5785 

5786 

5787 

5788 

5789 

5790 

5791 

5792 

5793 

5794 



046535 

046542 

046550 

046556 

046564 

046572 

046575 

046602 

046610 

046616 

046624 

046632 

046635 

046642 

046650 

046656 

046664 

046667 

046674 

C46702 

046710 

046716 

046724 

046732 

046740 

046746 

046747 

046754 

046761 

046766 

046774 

047002 

047010 

047015 

047022 

047030 

047036 

047044 

047052 

047060 

047064 

047072 

047100 

047106 

047114 

047122 

047130 

047136 

047144 

047152 

047160 

047161 

047166 

047174 

047202 

047210 



123 
051501 
053440 
051505 
042440 
041520 

120 
051501 
040527 
051505 
042440 
041520 

105 
042524 
020040 
042522 
042105 

123 
020040 
020040 
030122 
051440 
051501 
047124 
051122 

000 

105 
042524 

120 
020040 
020040 
030122 
051440 

061 
020067 
032053 
030062 
024040 
042522 
042105 
051520 
020040 
020040 
020060 
051123 
020040 
047516 
047522 
040504 
020040 

200 

105 
042124 
044505 
051505 
042440 



030122 
C51440 
051501 
047124 
051122 

000 
053523 
051040 
020123 
047124 
051122 

000 
050130 
020104 
020040 
042503 

200 
030122 
051440 
020040 
053440 
031122 
052040 
020117 
051117 

050130 
035104 
053523 
050040 
020040 
020040 
031122 
030067 
024040 
020051 
032061 
022063 
042503 
100072 
020127 
041520 
020040 
020040 
020062 
042524 
020040 
050122 
040524 
040504 

050130 
051040 
042126 
047124 
051122 



053440 
031122 
052040 
0201 1 7 
051117 

053440 
020066 
052040 
020117 
051117 

041505 
020040 
020040 
053111 

020040 
031122 
051440 
051501 
053440 
051505 
0'«2440 
041520 

041505 
200 
020040 
020103 
051440 
020040 
200 
030460 
022063 
030040 
020067 
100051 
053111 

020040 
020040 
051123 
020040 
020040 
052123 
051105 
000103 
020040 
040524 

041505 
041505 
052040 
020117 
051117 



DH40: 



DH42: 



DH44: 



DH45: 



DH46: 



.ASCIZ /SRO WAS SR2 WAS TESTNO ERRORPC/ 



.ASCIZ /PSW WAS R6 WAS TESTNO ERRORPC/ 



.ASCII /EXPECTED 



RECEIVED/<CRLF> 



.ASCIZ /SRO SR2 SRO WAS SR2 WAS TESTNO ERRORPC/ 



.ASCII /EXPECTED:/<CRLF> 

.ASCII /PSW PC SRO SR2/<CRLF> 

.ASCII /170017 (3$*4) 020147 (3$)/<CRLF> 

.ASCII /RECEIVEO:/<CRLF> 

.ASCIZ /PSW PC SRO SR2 TESTNO ERRORPC/ 



.ASCII /DATA DATA/<CRLF> 



.ASCIZ /EXPECTD RECEIVD TESTNO ERRORPC/ 



CjKDADO iCTfll-AA MMU DIAG MACVll 30A(10 

CJKDAD.Pn 19-DEC-80 11:05 ERROR 





v*» ' c 1 0 


Oil s?n 

UH 1 JC V 


000 




DH50- 






1 ?4 
1 c"» 


fiSI SOS 

V J 1 Jv J 


047124 

V** r 1 C" 


^707 


w*» ' ecu 


0P01 1 7 

UcU 1 1 ' 


04P440 


051 1 22 

\J J \ ' C C 
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0^01 PP 

\Jj\J \ c c 
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04710A 
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VC W~ V 




JO 1 C 


047146 
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SA1^ 

JO > J 


047154 

V/*t r J J*t 


051501 

V J < JV * 


051440 


031122 




S81i 

JO 1 *t 
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051440 


051501 


050040 




JO • J 


047170 


053523 

\J J J J C -J 


020040 

VC W~ V 


020040 

VC. V v~ w 




S816 


047176 


052040 


051505 


047124 




581 7 


047404 


020117 


042440 


051122 




5818 


04741? 


051117 


041520 


000 




5819 

JW ' ' 


04 74 1 7 


120 


053523 


053440 


DH56: 


5820 


047A24 


051501 


042440 


050130 




58?1 

JVC I 


04741? 


041505 


042124 


052040 




58?? 


047440 


051 505 


047124 


020117 




58?3 


047446 


042440 


051122 


051117 




58?^ 


047454 


041520 


000 






SAPS 
















047460 








S8P7 










DTI : 


58P8 


047460 


001 266 


001 270 


001264 


58P9 


047466 


001262 


001 ■'16 


000000 




58^0 


047474 


001266 


001270 


001 264 


DT2: 


58^1 

JO J 1 


04750? 


001272 


001274 


001262 




58V 

JO JC 


047510 


001 116 

W 1 1 1 w 


000000 

www 




DT3: 


58^^ 


047514 

r J 1 ^ 


001 16? 

W 1 I wC 


001 164 

W 1 ' w~ 


001 262 


58 

JO 


0475?? 

V/*t r JCC 


001 116 


000000 

www 






58^5 

JO J J 




001 16? 


001 262 

W 1 bWb 


001116 


DT7: 


JO JVJ 


047514 

V~ • ^ J^ 


000000 

www 






DTIO: 


5817 


047516 


001100 

W 1 ^w 


001302 


001304 


5818 

JO JO 


047544 


001 ?62 


001116 


000000 

V V V V V V 




5819 

JO J 7 


04755? 


00116? 

W « ' wC 


001164 


001 164 


DT11 ; 




047560 


001 ?6? 


001116 


000000 

www 




J^^ 1 


047566 


001162 

W V * ■ WC 


001 164 


001 166 


DT12: 


584? 

JO^C 


047574 


001 166 

W I • WW 


001 262 

W 1 bWb 


001116 




5843 


047602 


000000 






DT13: 


5844 


047604 


001162 


001262 


001116 


5845 


OA 761 2 


000000 








5846 


OA 761 4 


001162 


001164 


001 1 74 


DT16: 


5847 


0A7622 


001166 


001262 


001116 




5848 


047630 


000000 








5849 


047632 


001312 


001306 


001172 


DT17: 


5850 


047640 


001262 


001116 


000000 
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MESSAGES, DATA HEADERS-TABLES ft FORI^IATS SEO 0113 

.ASCIZ /TESTNO ERRORPC/ 
.ASCIZ /SRO WAS SR2 WAS TESTNO ERRORPC/ 



.ASCII /PHYSICL PAR 4/<CRLF> 

.ASCIZ /ADDRESS V.8.A. PAR 4 SRO WAS SR2 WAS PSW TESTNO ERRORPC/ 



.ASCJZ /PSW WAS EXPFCTD TESTNO ERRORPC/ 



.EVEN 

.WORD TRAPPC,TRAPPS.WASR6. TESTNO. $ERRPC.C 

. WORD TRAPPC , TRAPPS . WASR6 . WASSRO , WASSR2 . TE S TNC , $ERRPC . 0 

.WORD $REG0.$REG1,TESTN0.$ERRPC.0 

.WORD $REG0,TESTNO,$ERRPC.0 

. WORD ANDADR , ORADR . TONUM , TE S TNO . SERRPC , 0 

.WORD SREG0,SREG1,SREG1, TESTNO, SERRPCO 

.WORD $REG0,$REG1 ,$REG2,$REG2, TESTNO, SERRPC.O 

.WORD $REG0,TESTNO,$ERRPC,0 

.WORD $REG0,$REG1,$REG5,$REG2, TESTNO. $ERRPC,0 

. WORD P8AL 0 . V I R T 1 . $RE G4 , T E S TNO . $E RRPC . 0 



CjKDAOO KIFII-A 
CJUDAD.PII 1 

5851 (K76A6 

5852 (K765A 
5855 047662 

5854 OA 7670 

5855 047676 

5856 047702 

5857 047710 

5858 047716 

5859 047?<r4 

5860 047726 

5861 047734 

5862 047740 

5863 047746 

5864 047752 

5865 047760 

5866 047766 

5867 047770 

5868 047776 

5869 050004 

5870 C50006 

5871 050014 

5872 050022 

5873 050024 

5874 050032 

5875 050036 

5876 050044 

5877 050052 

5878 050054 

5879 050062 

5880 050070 

5881 050072 

5882 050100 

5883 050104 

5884 050112 

5885 050120 

5886 050122 

5887 050130 

5888 050134 

5889 050142 

5890 050146 

5891 050154 

5892 050162 

5893 050164 

5894 050172 

5895 050200 

5896 050202 

5897 050210 

5898 050214 

5899 050222 

5900 050230 

5901 050234 

5902 050242 

5903 050250 

5904 050256 

5905 050264 
5906 



\ mo DIAG 

►-DEC-80 11:05 

001 3"' 2 001306 

001 1 72 001 1 74 

001262 001116 

001174 001170 

001116 000000 

001162 001174 

001262 001116 

001174 001262 
000000 

001166 001164 

001116 000000 

001166 001176 

001116 000000 

001272 001170 

001176 001262 
000000 

001274 001172 

001176 001262 
000000 

001162 001 172 

001274 001262 
000000 

001162 001172 

001116 000000 

001162 001172 

001166 001262 
000000 

001162 001172 

001170 001262 
000000 

001274 001164 

001116 000000 

001176 001202 

001274 001262 
000000 

001272 001274 

001116 000000 

001164 001166 

001116 000000 

001162 001164 

001274 001262 
000000 

001164 001170 

001274 001262 
000000 

001162 001164 

001116 000000 

001262 001116 

001272 001274 

001116 000000 

001312 001306 

001272 001274 

001262 001116 

001164 001166 

001116 000000 
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ERROR ME 



001310 


DT20: 


001 1 76 




000000 




001 262 


DT21 : 


001170 


DT22: 


000000 




001116 


DT23: 


001 262 


DT24: 


001262 


DT26: 


001166 


DT30: 


001 116 




001 loo 




001116 




AAi ^7*5 

001272 




001116 




AAt 

001 cbe 


DJ53: 


AAI 070 


f\T7/ • 


001116 




AA1 07/ 


: 


001116 




001262 


DT36: 


001272 


DT37: 


001116 




001262 


DT40: 


Arti 




nA1 070 
\J\J\Cf C 




001116 




AA1 070 


DTA5: 


001116 




001262 


DT46: 


000000 


DT50: 


001262 


DT51 : 


001172 


DT52: 


001 1 76 




000000 




001262 


DT56: 
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SSAGES. DATA HEADERS-TABLES t FORMATS SEQ 0114 

.WORD P8AL0.VlRT1,VlRT2.$REG4.$REG5,$TMP0.T£STf«.$ERRPC.^ 

.WORD $REG5,$REG3.TESTNO.$ERRPC.O 

.WORD $REGO.$REG5,$REG3,TESTNO,$ERRPC,0 

.WORD $REG5.TESTN0.$ERRPC,0 

. WORD $R:- G2 . $RE G 1 . T E S TNG. $E RRPC . 0 

. WORD $RE G2 . $ TMPO . T E S T NO , SERRPC , 0 

.WORD WASSR0,$RE63.$REG2,$TMP0,TESTN0,$ERRPC,0 

. WORD WASSR2 , $RE G4 , $RE G2 . $ TMPO . TE S TNO . $E RRPC . 0 

. WORD $RE GO , $RE G4 , WASSRO , WASSR2 , TE STNO , SERRPC , 0 

.WORD $REG0,$REG4.TESTNO. SERRPC. 0 

.WORD $REG0.$REG4,WASSR0.$REG2,TESTN0.$ERRPC.0 

.WORD SREG0,SREG4,WASSR2,$REG3,TESTN0, SERRPC, 0 

. WORD WASSR2 , $RE G1 . T E S TNO , SERRPC . 0 

. WORD STMPO . STWP2 . WASSRO , WASSR2 , TE 5 TNO , SERRPC , 0 

.WORD WASSRO,UASSR2,TESTNO,SERRPC,0 

.WORD SREG1,SREG2,TESTN0. SERRPC. 0 

.WORD SRE GO, SREG1,WASSR0.WASSR2,TESTN0, SERRPC. 0 

.WORD SREGl .SREG3.WASSR0.WASSR2.TESTNO. SERRPC. 0 

. WORD SREGO .SREGl . TE 5 TNO. SERRPC . 0 

.WORD TESTNO. SERRPC. 0 

.WORD WASSR0,WASSR2. TESTNO. SERRPC. 0 

.WORD P8AL0. VIRT1.$REG4.WASSR0.WASSR2. STMPO. TESTNO. SERRPf.O 



.WORD 



SREGl. SREG2. TESTNO. SERRPf.O 



L.tcDADO KTF11-AA MMU DIAG 
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ERROR MESSAGES. DATA HEADERS-TABLES I FORMATS 



SEO 0115 



5907 


0*^0270 


000 


000 


000 


DFl : 


.BYTE 


0.0.0.0.0 


5908 




000 


000 








0,0.0,0,0,0.0 


5909 


0502>5 


000 


000 


000 


DF2: 


.BYTE 


5910 


05030'1 


000 


000 


000 








5911 


05030 5 


000 






DF3: 




0.0.0.0 


5912 


05030-. 


000 


000 


000 


.BYTE 


5913 


05030' 


000 






DF7: 




0.0.0 


5914 


050310 


000 


000 


000 


.BYTE 


5915 


05031 3 


000 


000 


001 


DFIO: 


.BYTE 


0.0.1.0.0 


5916 


050316 


000 


000 








0.0.2,0.0 


5917 


0503? 0 


000 


000 


002 


DFll: 


.BYTE 


591 a 


0503<' 3 


000 


000 








0,0.0.2,0.0 


5919 


0503'J5 
050'>30 


000 


000 


000 


DF12: 


.BYTr 


5920 


002 


000 


000 






0.0.0 


5921 


050533 
0';0336 


000 


000 


000 


DF13: 


.BYTE 


5922 


000 


000 


000 


DF16: 


.BYTE 


0.0.0.0.0.0 


5923 


050341 


000 


000 


000 


DFl 7: 




3.0.0.0.0 


5924 


f 50344 
'J50347 


003 


000 


000 


.BYTE 


5925 


000 


000 








3,0.0,0.0,0,0,0 


5926 
592"" 


C50351 


003 


000 


000 


DF20: 


.BYTE 


050354 


000 


000 


000 








59:. 8 


050357 


000 


000 








0,0.0.0 


5<;^29 


050361 


000 


000 


000 


DF21: 


.BYTE 


5930 


050364 


000 






DF22: 




0.0.0.0,0 


5931 


050365 


000 


000 


000 


.BYTE 


5932 


050370 


000 


000 








0,0.0 


5933 


050372 


000 


000 


000 


DF23: 


.BYTE 


5934 


050375 


000 


000 


000 


DF24: 


.BYTE 


0,0,0,0 


5935 


050400 


000 






DF30: 




0,0,0,0,0,0 


5936 


050401 


000 


000 


000 


.BYTE 


5937 


050404 


000 


000 


000 






0,0,0,0 


5938 


050407 


000 


000 


000 


DF46: 


.BYTE 


5939 


050412 


000 










0.0 


5940 


050413 


000 


000 




DF50: 


.BYTE 


5941 


050415 


000 


000 


000 


DF51: 


.BYTE 


0.0.0,0 


5942 


050420 


000 










3,0,0,0,0,0,0,0 


5943 


050421 


003 


000 


000 


DF52: 


.BYTE 


5944 


050424 


000 


000 


000 








5945 


050427 


000 


000 








0,0.0.0 


5946 


050431 


000 


000 


000 


DF56: 


.BYTE 


5947 


050434 


000 












5948 
















5949 




000001 








.END 
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AfiASF = 


000000 




857 




AfDUl = 


000000 

www 




857 




AfDUP = 


000000 

WW WW 




857 


Of C 


Af PUOP= 


000000 

w W W w 




857 


AODWO = 


000000 

Www w 




857 




ADDWl = 


000000 

WWWW 




857 




ADDU10= 


000000 

www 




857 




ADDWl 1 = 


000000 

WWWW 




857 




ADDUl 2= 


000000 

WW WW WW 




857 




ADDUl 


000000 

WWWW 




857 




ADDU1 A= 


000000 

W WW WW w 




857 




ADDUl 5= 


000000 

WW WW WW 




857 




ADDU? = 


000000 

www 




857 




ADDW3 = 


000000 

WWWW 




857 




ADDW4 ~ 


000000 

wwwwww 




857 




ADDW5 = 


000000 

w vwwww 




857 




ADDW6 = 


000000 

W WWWW W 




857 




ADDW7 - 


000000 




857 




ADDW8 = 


000000 




857 




ADDU9 = 


cooooo 




857 


oOj 


ArtEVCT= 


000000 




857 


ADEVn = 


000000 




857 


000 


AENV = 


000000 

www WW w 




857 


AENVn = 


000000 

wwwwww 




857 


RAO 

0q7 


AFATAL = 


000000 




857 


860 


AMADR1 = 


000000 




857 


OOJ 


AMADR2= 


000000 




857 




AMADR3= 


000000 




857 




Af1ADRA= 


000000 

wwwwww 




857 


B7Q 

Of T 


AMAMS1= 


000000 

www WW w 




857 


AMAMS2= 


000000 




857 




Arwis3= 


000000 

W WWWW w 




857 




AMAMSA= 


000000 




857 


RA^ 
OOj 


AnSGAD= 


000000 




857 


AMSGLG= 


000000 




857 


000 


AMSGTy= 


000000 




857 


R^O 
057 


AMTYP1= 


000000 




857 


OoU 


AMrYP2= 


000000 




857 




AMTYP3= 


000000 




857 




AMTYP4= 


000000 




857 




AND ADR 


001300 




8974r 


1 5 1 0" 


APASS = 


000000 

W WW w w w 




857 


00^ 


APR I OR = 


000000 

wwwwww 




857 




APTCSU= 


000040 




4762 


/ RRZif 
'iOOhw 


APTENV= 


000001 




4216 


HI J J 


APTSIZ= 


000200 




1334 


■too Iff 


APTSPO= 


000100 




4757 


hOhc 


ASUREG= 


000000 




857 


of\J 


ATESTN= 


000000 




857 


OO 1 


AUNIT = 


000000 






O&H 


AUSUR = 


000000 




857 


1171 
of 1 


AVECT1- 


000000 




857 




AVECT2= 


000000 




857 




BITO = 


000001 




6700 


2151 


BITOO = 


000001 




660# 


670 


BIT01 = 


000002 




659# 


669 
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SEO 0116 



1540* 1558* 1580* 1598* 1620* 1638* 1660* 1678* 1700* 5837 

4840 4882/y 
4883^ 



2178 2205 2233 2257 2300 2327 2354 2381 2453 



cjkdado 


KTfll-AA M«U 


DIAG 




30A(1052) 


14-JAN-81 11 


CJKDAD.PII 19-OEC- 


•80 n : 05 




CROSS REFERENCE 


TABLE - 




AAAAA/ 


658* 


Z Z D 










AAAA1 A 




ZZ. 7 










A/Wi5n 

UUUUfU 


656* 


z zz 

666 








ol I'J J - 




655* 


Z ^ c 
665 










AAA1 AA 


654* 


^^y 
664 








alWf - 


AAA5AA 


655* 


665 








DllUo - 


AAA/ AA 


65?* 


^ ^ "5 
66? 


U227 






AA1 AAA 


651* 


ZZ 1 

661 


41 52 




Bill 














BI 1 rU = 


AAOAAA 


650* 


/ lA/ 








O 1 T 1 1 - 




649* 










D 1 T 1 7 - 
BI 1 1 ^ - 


A1 A/VIA 


648* 


/ AQQ 

4U99 








BI 1 1 J - 


A5n/VlA 
Uc UVA/V 


647* 


421 1 








Q 1 T 1 A - 


Ay.AAAA 


646* 


y 1 7A 
*( 1 5U 








BI 1 O - 


1 lAAA.'v/ 


645* 


1736 








Dl 1 ^ 


UVA/UVM 


66o* 










BI 1 J - 




66/^* 






??56 


2299 


BI l*» = 


AAAAOA 


oto* 






Bi 1 J 




665* 


7/ C 








D 1 TA — 
BI lO - 


rAA1 AA 


664* 








D I T 7 

BI 1 ' - 


AAAPAA 
UwUc WW 


663* 










Bl 10 


aaaaaa 


662* 










BIT9 = 


001000 


Z Z 1 M 

661* 










Br 1 VCt = 


AAAA1 Z. 






4226 


5177* 






1 w*f" • w 


4129 


y 1 A7 

4 1 95 


4408* 






2017 


2025 


2033 


2041 




WJ' w J 1 


4712 


y "y^iM 
HfdSIl 


4710* 










/ CCD 








r D — 

L K - 


AAAAI «; 
UUUw ' J 


COCm 


y B1 s 


4828 




5551 


roi f - 

LnLr - 


wwwcwU 


JOO* 


1 7AA 


1^772 


4828 




C7A7 

jy 6f 


S772 


S777 


5787 


r\A| TQ1 


n?7i ^? 

Ucf 1 JC 


Of^A1 


OAA 7* 








UAL 1 Oc 


n371 
Uc » 1 OO 


"501 iL 


OOBC^ 








U'nL IB J 


n37^nn 


7A1 y 
5U14 


TAOAm 

5UoU* 








UAL 1 0*» 


n?7S7^ 

Uc ' J J** 


3029 


7AOO M 

5uyo* 


1Z22 






nn f CP - 


1 77'; 70 




ooy 
824 






1 

\JT 1 


\Jj\JC 1 w 




COA7j# 

i)yu^* 










w^wJ 1 J 




CQ1 Cir 


5917* 






At 1 1 


U jUOc w 




1 5A/^ 

1 t!\JO 






AC 1 3 




98 1 


1 AAA 


5919* 






AC 1 t 






yy5 


59?1* 






AC 1 A 














AC 1 7 

yr 1 f 




1 Ai i 










AC 5 




930 


C AAA** 

5909* 










W JWJ J 1 


102 1 


5926* 








AC ?1 

Vr C 1 


U^w^O 1 


1028 


CA^Om 

592y* 








AC ?P 




1035 


CQ71 M 

5^5 1* 


5933* 






ur 


ACA77P 


1 A/ 1 


1177 

1 1 5y 


1065 


1089 


Of 24 


050375 


1 04/^ 


1 AC7 


1059 


OF 3 


05030A 


956 


oy "5 


948 


954 


5912* 


OF 30 


050401 


1 A71 


1 A77 


1083 


1095 


1 1 AA 


0FA6 


050407 




1 1 AA 


1193 


5938* 




OF SO 


050413 


1174 


1199 


5940* 






DF51 


050415 


1180 


5941* 








DF52 


050421 


1187 


5943* 








OF 56 


050431 


1212 


5946* 









36 
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PAGE 118 
>ER SYMBOLS 



SEO 



2353 2380 2452 



4508 



5563 
5805 



5578 5600 



5612 



5622 5637 5725 5751 



1106 
1113 



1119 
1144 



1125 
1154 



1131 
5936* 



5934* 



rjKDADO tcTFn-AA mi diag 
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CROSS REFERENCE TABLE — USER SYMBOLS 



OF 7 


050310 


960 


591 4# 




DHl 


OAA253 


922 


5523* 




DHiO 


044503 


964 


5551* 




DH1 1 


044603 


971 


1203 


5563* 


DH12 


044723 


978 


997 


5578* 


DHl 3 


045063 


985 


991 


5595* 


DH16 


045113 


1004 


5600* 




DHl 7 


045213 


1011 


5612* 




Dh2 


044323 


928 


553C* 




Dh20 


045303 


1018 


5622* 




Dh21 


045431 


1025 


5637* 




Dh22 


045511 


1032 


5646* 




Dh25 


045610 


1039 


1135 


5657* 


Dh2A 


045640 


1045 


1051 


5661* 


Dh26 


045700 


1057 


1063 


5667* 


Dh3 


044413 


934 


940 


946 


Dh30 


045740 


1069 


5673* 




Dh31 


046020 


*075 


5681* 




Dh32 


046100 


1081 


5689* 




Dh33 


C46160 


1087 


5697* 




Oh3^ 


046220 


1093 


5703* 




DH35 


046300 


1098 


5711* 




0H36 


046360 


1104 


1123 


5719* 


Dh37 


046420 


1110 


5725* 




DH40 


046535 


1117 


5739* 




DH42 


046575 


1129 


5745* 




DHA4 


046635 


1141 


5751* 




DH/,5 


046747 


1148 


5765* 




DH46 


047144 


1158 


1165 


1190 


DH50 


047221 


1172 


1197 


5796* 


0H51 


047241 


1178 


5799* 




DH52 


047301 


1184 


5805* 




Dh56 


04 74 1 7 


1210 


5819* 




Dh7 


044453 


958 


5546* 




DISPLA 


001142 


824# 


1322* 


1330* 


DISPRE 


0001 74 


7t0ff 


1330 




DOAGIN 


034176 


4079 


4090* 




DSWR = 


177570 


591# 


823 


1321 


DTI 


047460 


923 


5828* 




0T10 


047536 


966 


5837* 




0T11 


047552 


973 


1205 


5839* 


DT12 


047566 


980 


999 


5841* 


DT13 


047604 


986 


992 


5844* 


DT16 


047614 


1006 


5846* 




DT17 


047632 


1013 


5849* 




0T2 


047474 


929 


5830* 




DT20 


047646 


1020 


5851* 




0T21 


047670 


1027 


5854* 




DT22 


047702 


1034 


5856* 




0T23 


047716 


1040 


1136 


5858* 


DT24 


047726 


1046 


1052 


5860* 


DT26 


047740 


1058 


1064 


5862* 


DT3 


047514 


935 


941 


947 


DT30 


047752 


1070 


5864* 




DT31 


047770 


1076 


5867* 




DT32 


050006 


1082 


5870* 





952 5540# 



5787* 



1330* 4174* 4203« 



953 5833* 



CJKDAOO 


kTMT-AA 


•^ll DIAG 


HACVll 




■DEC-80 ""IrOS 








1088 


5873# 




nsoov. 


1094 


5875* 






1099 


5878* 




nsno7P 


1105 


1124 






1112 


5883* 






ni8 


5886* 


V < He 




1130 


5888* 




w * "w 


1143 


5890* 


V ' y 




1153 


5893* 


1/ • ■•w 


OSOPOP 

V/ ^VCwc 


1160 


1167 






1173 


1198 






1179 


5899* 






1186 


5901* 




V ^wC 


1211 


5904* 






959 


5835* 




000030 


680* 


1291« 




041 16? 


921 


5236* 




04 1 S4 1 


963 


5281* 


FM1 1 


04 1 605 


970 


5288* 


t ™ ' c 


C41645 


977 


5294* 


FM1 ^ 

t " • 


041 7K 


984 


5301* 




041751 


990 


5306* 




04P004 

w"*C W~ 


996 


5311* 


FM16 


042060 

V~C Ww 


1003 


5319* 


FM1 7 


0421 22 

w^ ^ 1 


1010 


5325* 


CMP 


041222 


927 


5242* 




042160 


1017 


5330* 




042232 

w~C C 


1024 


5337* 


C ' ICC 


042267 

w~ C b w • 


1031 


5342* 




042326 

w~ w w 


1038 


5348* 




04237? 


1044 


5354* 




042432 

v~ c~ vc. 


1050 


5360* 




042475 

V~C~' ^ 


1056 


5366* 


FMP7 

trie f 


042545 


1062 


5373* 


FM^ 


041271 

w~ It' ' 


933 


5249* 


FM^n 


042614 


1068 


5380* 


FM^1 


042666 


1074 


1097 


FM^? 


042733 


108C 


5394* 


FM^^ 


043014 


1086 


5403* 




043077 


1092 


5412* 


FM^7 


043155 


1109 


5420* 




041330 

V~ 1 J^w 


939 


5255* 




043222 

V~-^C cc 


1116 


5^*27 » 


FM41 


043271 


1122 


5434* 




043324 


1128 


5439* 




043363 


1134 


5445* 




043432 


1140 


5452* 


FM4S 


043476 


1147 


5458* 


FM46 


043551 


1157 


5466* 


EMA7 


043614 


1164 


5472* 


EMS 


041363 


945 


5260* 


EM50 


043657 


1 171 


5478* 


EM51 


043715 


1 1 77 




EM52 


043773 


1183 


5492* 


EM53 


044051 


1189 


5500* 


fM54 


0441 U 


1196 


5506* 



C 10 

?0A(10^2) 14-JAN-81 11:36 PAGE 120 
CROSS REfEREMCE TABLE — USER SYMBOLS 



5881* 



•!192 
5898* 



1292' 



5896* 



1103 



5387* 
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E»155 
EM56 
EM6 
EM7 

FRRTVP 
ERRVEC= 
FORMPA 
GNS 

GTSWR = 
hT = 
IOTVEC= 
ICERSTIC = 

K1PAR0= 
KiPARIs 
MPAR2= 
K I PAR 3= 
K1PAR4- 

KIPAR5= 
ICIPAR6^ 
K1PAR7= 
•ClPDRO= 
tClP0R1 = 
<IP0R2= 
ICIP0R3= 
KIPDRA= 



MPDR5= 
KiPDRAs 
tcIPDR7= 
LF 

LOOP 
MGMERR 

WGMFl G 
^nvEC = 

OR ADR 

P8AHI 

PBALO 

P0RT81 

PDRT82 

PDRTB3 

PDRTB4 

PIRO : 

PI ROVE = 

PRO = 

PR1 : 

PR2 : 

PR3 - 
PR4 

PR5 : 

PR6 = 



044152 
044210 
041436 
041503 
035022 
000004 

035620 
•••••• 

104407 
000011 
000020 
001100 

172340 
172342 
1 72344 
172346 
172350 

172352 
1 72354 
172356 
1 72300 
1 72302 
1 72304 
1 72306 
172310 



172312 
172314 
172316 
000012 
020464 
002150 

002152 
000250 

001 302 
001314 
001312 
027150 
027202 
027516 
027550 
177772 
000240 
000000 
000040 
000100 
000140 
000200 
000240 
000300 



1202 

1209 
951 
957 

4213 
673# 

2160 
759 

5181 

1354 
583# 
678* 
7Ub» 

3143 
733# 
734# 
735# 

736# 
737* 

2506* 
738# 
739# 

722» 
721M 
72t*» 
7250 
72t» 
3251* 
3737. 
727 n 
72iM 
729M 
584* 
1363/f 
1254* 
3938 
1255# 
689* 
3032* 
898# 
903# 
902# 
2902 
2917 
3015 
3030 
590# 
684# 
607* 
608* 
609* 
610* 
611* 
612* 
613* 
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5511* 

5516* 

5268* 

5275* 

4259* 

1519 

2187 

1559 

4719 

4770 

1289* 

1475 

5205 

1556 

3470* 

3471 • 

2554 

2148» 

2736* 

2457. 

2706* 

5474. 

1596 



2739. 
2485. 
5492* 
5752* 
2486* 
2693* 
2682* 
4822 

1366 

1270* 
1566* 
5075* 
1517. 
4507* 
4498. 
2976* 
2995* 
5089* 
5106* 



SEO 0120 



1520* 

2214 

5168 


^551. 

2242 
5169 


1364. 

2266 
5170 


1365. 

2509 
5171 


2694. 

2556 

5172 


2707. 

2565 

5173 


4155 
2590 
5175 


4156* 

2467 

5177 


4138* 

2520 

5178 


4141* 
4485* 
5179 


5180 


5175* 

4828 

1290* 

1477 

5210 

1829 


147'y 
5275 
1919 


2015 
3292 
2022 


2025 
5351 
2076 


2051 
3411 
2150 


2039 
3505 
5469. 


2696 
5857 
4585 


2906 
5969 
4425 


2928 
4488 


3019 


5041 


2755* 
2175. 
5151. 
2488* 


5130* 
2202* 
5475. 
2498* 


3472* 
2250* 
3493* 
2507. 


2255* 
3645* 
3180* 


2297* 
3823* 


2524* 


2551* 


2378* 


2456* 


2487* 


2497* 


1875 


1965 


20^3 


2065 


2157 


2558 


2562 


2576 


5478 


4381 


4409 



2899* 


5132* 














5155* 


3160* 


2499* 


2505* 


2746* 


2815* 


2909* 


2921* 


3022* 


3054* 


5498* 


3643* 


3669* 


5671* 


3686* 


5688* 


3701* 


3703* 


5717* 


3719* 


57'^4. 


3771* 


3775* 


5822* 














2500- 


2504* 


2900* 


3182* 


3252* 












2697 


2705* 


















2685 


3342* 


3371* 
















4828 




















2510 


2793 


2854 


2962 


3075 


3161 


3253 


3370 


3444 


3611 


1570. 


















2962* 


1567. 


2451* 


2510* 


2745* 


2793* 


2812* 


2854* 


2904* 


2919* 


5156* 


3161* 


3202* 


3208* 


3255* 


3497* 


3611* 


3647* 


3782* 


3830* 


^558* 


^559* 


1578* 


1599* 


1618* 


1639* 


1658* 


1679* 


1698* 


5857 


4510* 




















4499. 


4504* 


5849 


5851 


5901 













5181* 
5735* 



3782 



5017* 
5958* 
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: 


000340 


614* 










PS = 


} 77776 


587* 


588 








P-^jW = 


1 77776 




1409* 


1410* 


1411 


1415* 






1455* 


1472* 


1474* 


1476* 


1773* 






2551* 


2617* 


2665* 


2750 


2783* 






3286* 


3291* 


3294* 


3296* 


3312* 






3535* 


3547* 


3558» 


3572* 


3586* 






3765* 


3821* 


3832* 


3851 • 


3864 • 






4343 


4345 


4489 






PWRMSG 


041120 


5217 


5226* 








PWRVEC= 


000024 


679# 


1295* 


1296* 


5186* 


5187* 


RDCHR = 


104411 


4639 
5179* 


5178* 








RDLIN = 


104412 










RESREG= 


104414 


5124 


5181* 








RESTRT 


020464 


1362* 


4110 


5219 






RESVEC= 


000010 


674# 


1306* 


1313* 






SAVREG= 


104413 


5''09 


5180* 








SETREG 


035534 


2014 


2063 


4380* 






SRC = 


177572 


693# 


1266 


1268* 


1372* 


1514 






2205* 


2207* 


2233» 


2235* 


2257* 






2383* 


2453* 


2521 


2523* 


2683 






2952* 


3042 


3058* 


3063 


3065* 






3409* 


3618 


3620* 


3788 


3790* 


SRI = 


177574 


694# 


1795 








SR2 = 


1 77576 


695* 


1267 


1727 


1748 


2522 






3193 


3207 


3212 


3231 


3242 


SR3 = 


172516 


696* 
2380* 


1801* 
2452* 


1802 
4508 


1809* 


1812 


STACK = 


001100 


578* 


746 


747 


1287 


1363 


START 


020000 


763 


1280* 








STKLMT= 


1 7777^* 


589# 










SWR 


001140 


823* 


1285 


''321» 


1323 


1 329* 


4204 


42'' 1 


4223 


4227 


4527 


SWREG 


000176 


761* 


1329 


1352 


4527 


4540 


SWO = 


000001 


642* 










SWOO = 


000001 


632* 


642 








SWOI = 


000002 


631* 


641 








SW02 = 


000004 


630* 


640 








SW03 = 


000010 


629* 


639 








SWOA = 


000020 


628* 


638 








swos = 


000040 


627* 


637 








SU06 = 


000100 


626* 


636 








SW07 = 


000200 


625* 


635 








SWOS = 


000400 


624* 


634 








SW09 = 


001000 


623* 


633 








SWl = 


000002 


641* 










swio = 


002000 


622* 










swn = 


004000 


621* 










syi2 = 


010000 


620* 










SW13 = 


020000 


619* 










swu = 


040000 


618* 










SW15 = 


100000 


617* 










SW2 = 


000004 


640* 










SW3 = 


000010 


639* 










SW4 = 


000020 


638* 










SW5 = 


000040 


637* 











E 10 
56 PAGE 122 

USER SYMBOLS SEO 01 



1423* 


1434* 


1436* 


1437 


1442* 


1448* 


1450* 


1451 


1783* 


2226 


2251 


2433» 


2458 


2479 


2489* 


2491 • 


2789* 


2791* 


2817 


2850* 


2852* 


3272* 


3277* 


3284 


3316 


3318* 


3401* 


3410* 


3412* 


3414* 


3502* 


3523* 


3599* 


3650* 


3661* 


3682* 


3698» 


371 3* 


3730« 


3748« 


3876» 


3887* 


3900« 


3914* 


3927* 


3939* 


3966* 


4009* 


5196* 


5202* 


5214* 


5215* 










1717 


^771,* 


1776 


1782* 


2151* 


21 53* 


2178* 


2180* 


2259* 


2300* 


2302* 


2327* 


2329» 


2354* 


2356* 


2381 • 


2684* 


2764 


2779* 


2831 


2846* 


2929 


2945* 


2950 


31 51 • 


3206 


3211 


5227 


3^41* 


335^ 




340r 


3946 


3948* 
















CO JC 




cyj 1 








J 1 o*» 


3353 


3408 


3619 


3789 


3947 








2150« 




2204* 


2232* 


?256* 


2299* 


2l2f 


2353* 


4010 


4029 














1336» 


1352 


4099 


4130 


4U4 


414'. 


4152 


4159 


4572* 


5^94 


5207* 
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SEO 0122 



SW6 - 
Sw7 = 
Sw8 = 
SW9 = 
TBIT = 
TBI TPS 
'BlTVEs 
TESTNO 



TIMERR 

TIMFLO 

T<VEC = 

TOFF 

TON 

TONUM 

'PVEC = 
TRAPPC 



000100 
000200 
OOOAOO 
001000 
000020 
001276 
OOOOU 
001262 



002076 
002100 
000060 
035246 
035302 
001 304 

000064 
001266 



TRAPPS 001270 



TRAPVE= 

TRTVEC: 

TST1 

»ST10 

TST11 

TST12 

TST13 

TST14 

TST15 

TST16 

TST17 

TST2 

TST20 

TST21 

TST22 

TST23 

TST24 

TST25 

TST26 

TST27 

TST3 

TST30 

TST31 

TST32 

TST33 

TST34 

TST35 

TST36 

TST37 

TST4 

TST40 

TST41 

TST42 

TST43 



000034 

000014 

020546 

021516 

021650 

022002 

022144 

022202 

022274 

022412 

022534 

020620 

022664 

023014 

023220 

023404 

024176 

024626 

025352 

025554 

020704 

025762 

026130 

026424 

026634 

027216 

027564 

027756 

030360 

021026 

030546 

030630 

031000 

031322 



636* 
635# 
634# 
633# 
744# 
896# 
675# 
890* 
585<. 
5886 
1226* 
1227# 
682* 
2552 
2598 
899* 
1680* 
683* 
892* 
3786* 
893* 
3787* 
681* 
676* 
1383* 
1610 
1650 
1690 
1771* 
1793* 
1814 
1871* 
1917* 
1406* 
1961* 
2009* 
2056* 
2128* 
2288* 
2431* 
2512 
2616* 
1432* 
2677* 
2732* 
2805* 
2898* 
2964 
3077 
3179* 
3269* 
1471* 
3308* 
3340* 
3390* 
3468* 



4343 

1371* 

1303* 

4200- 

5856 

5888 

1364 

1239* 


4348 

4346- 

1304* 

5828 

5858 

5890 

1529 

1369* 


4361 
4361 

5830 
5860 
5893 
.569 


4363 

5833 
5862 
5396 
1609 


4364* 

5835 
5864 
5898 
1649 


5837 
5867 
5899 
1689 


5839 
5870 
5901 
2707 


5841 
5873 
5904 
3297 


5844 
5875 

3369 


5846 
5878 

3442 


5849 
5881 


5851 
5883 


2618 
2664 
1518- 
1686 


2679 
2709 
1526 
1701« 


3270 
3299 
1541* 
5837 


3391 
3447 
1560* 


4343* 
4361* 
1566 


1581- 


1600* 


1606 


162T 


1640* 


1646 


1661* 


1235- 

3796 

1236^ 

3795 

1293- 


1241 

3944* 

1240 

3945- 

1294» 


1263* 
3954 
1264- 
3953 


1272 
5828 
1271 
5828 


2514* 
5830 
2515* 
5830 


2530 
2529 


2948* 
2949* 


2958 
2957 


3061* 
3062* 


3071 
3070 


3616* 
3617* 


3626 
3625 



1632* 
1672* 
1715* 



1827* 



2550* 



3013* 
3 '29* 
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TSU6 
TS^47 

TST5 

1ST6 

TST7 

TVPSN 

TYPDS 

rvPE 



TYPOC = 
TYPON = 
TYPOS = 
JlPA«0= 
UIPAP1= 
UIPAR2= 
UIPAR3= 
UIPAR<,= 
UIPAR5= 
UIPAR6= 
UIPAR7= 
UIPDR0= 

JlPDRIs 
UIPDR2= 
UIPDR3= 
U]P0R4= 
U]P0R5= 
UIPDR6= 
U1P0R7= 
USESTK= 
VIRT1 

VIRT2: 
UASR6 
UASSRO 



032170 
035050 
C336U 
033720 
021074 
021232 
021 36A 
104406 
104405 
104401 



104402 
104404 
104403 
1 77640 
177642 
177644 
177646 
1 77650 
1 77652 
1 77654 
1 77656 
1 77600 

1 77602 
177604 
1 77606 
177610 
177612 
177614 
177616 
000700 
001306 

001310 
001264 
001272 



UASSR2 001274 



ueiT = 

UPTHD 

$ASTAT= 

SATYC 

SATYl 

SATV3 

SATY4 

SAUTOB 

SBDADR 

I6DDAT 

SeELL 



000100 
000204 
• \j 

037462 
037436 
037444 
037454 
001134 
001122 
001126 
001216 
037756 



3613 
5785 
3941 
4008# 
1478 
'530 
1570 
4308 
4062 
^346 
4327 
4672 
4268 
5171# 
5170* 
711# 

712* 
713* 
714* 
715* 
716* 
717* 
718* 
700* 
4437 
701* 
702* 
703* 
704* 
705* 
706* 
707* 
747* 
900* 
4492 
901* 
891* 
894* 
3211* 
5870 
895* 
2951* 
3232 
5878 
745* 
783 
4862 
4833 
4831* 
4760 
4219 
820* 
815/* 
817* 
849* 
4897. 
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5642* 
5815* 
5965* 

1510* 

1552* 

1592* 

5173* 

4076 

4053 

4538 

4673 

4294 



1636 

3486* 

5487. 

2620 

2456* 

2457* 

1856 
1676 



2740* 
2454* 
2455* 

1901 

1475 

2159* 

4498 

2465* 

1237* 

1266* 

3213 

5875 

1267. 

3043* 

3242* 

5881 

2568 

789* 
4877 
4835* 

4832* 
4834* 
1356* 



4^06 
4900* 



SEO 0^2l 



4501 
4063 
4539 
4675 
4541 


4718 
4077 

4542 
4678 
4713 


^U2ti 

4206 

4553 

4682 

5169* 


4214 
4563 
U7y2 


4260 
4574 
4716 


1.277 
4593 
4775 


(.279 
4643 
4901 


4282 
4652 
4969 


1*2^ 
4658 
5044 


4316 
4663 
516av 


4321 
4667 
5216 


1 O JO 






?099 


2438 


3274* 


3293 • 


3485* 


4393 


4451 


4491 


2737. 
2481* 
2482* 


3392* 
2508* 
2509* 


3488* 
2738* 


5595« 


3494* 


3646* 


3824* 










1947 
1903 


3489* 
1993 


2030 


2087 


2445 


2b2U 


2628 


2bi*2 


3482 


3817 


4389 


3394* 
2483- 
2484* 


3445* 
271*7* 


2814. 


3395* 


3644 • 


3831* 













1991 

3278 

2186* 

5849 

5851 

1265* 

2521* 

3227* 

5883 

1727* 

3052 

3244 

5883 

2577 



3295 

2213* 

5851 

5828 

2764* 

3228 

5886 

V29 

3064* 

3353* 

5886 

2588 



3413 
2241* 

5901 

5830 

2766 

5352* 

5890 

1748* 

3144* 

3362 

5890 

2634 



3508 
2265* 



2831* 

3355 

5893 

1749 

5145 

3408* 

5893 

2643 



3662 
2308* 



2833 

3407* 

5899 

2522* 

3184* 

3429 

5899 

2654 



3834 
2335* 



2929* 

3426 

5901 

2765* 

3186 

3619* 

5901 



3972 


3995 








2362* 


2389* 


2466* 


2474 


2519* 


2932 


2950* 


3042* 


3045 


3063* 


3618* 


3788* 


3946* 


5830 


5864 


2773 


2832* 


2840 


2930* 


2939 


3193* 


3195 


3212* 


3216 


3231* 


5789* 


3947* 


5830 


5867 


5870 



4535 



4239 
4901 



4699 



4908* 



rjRDADO KTfn-AA mj DIAG 
rjKDAD.pn 19-DEC-80 i1;05 



tCHARC 
SCKSyft 
tCLR.T 
SCnTAG 

tern - 

SC«2 = 

tCH3 = 

tC«4 = 

SCNTLC 

tCNTLG 

SCNTlU 

$CPUOP 

ICRLF 

tOBLK 

SDB20 

tOFVCT 

SDOAGN 

tOTBL 

SE»JOAD 

tENOCT 

SENULL 

SENV 

»ENVM 

IE OP 

SEOPCT 

SERFLG 

SERKAX 

(ERROR 

SERRPC 



$£RRTB 

tERTTL 

tESCAP 

SETABL 

tETEMD 

tFATAL 

tFFLG 

SFILLC 

(FILLS 

SGDAOR 

SGODAT 

$GET42 

tGTSWR 

$HD 

tHiBTS 

SICNT 

SILLUP 

SINTAG 

tITEMB 

ILF 

SLFLG 

$L0OP 

SLPAOR 

tLPERR 



057432 
035760 
054164 
001100 
000006 
000014 
000006 
000006 
036710 
036722 
056715 
001254 
001223 
040422 
040526 
001236 
054 2 34 
040412 
054166 
C54016 
054300 
001246 
001247 
035762 
054010 
001103 
001115 
034564 
001116 



001316 
001112 
001214 
001246 
001262 
001230 
057702 
001156 
001155 
001120 
001124 
054146 
056050 
000000 
000204 
001104 
041112 
001155 
001114 
001224 
057701 
054272 
001106 
001110 



1,777* 

4527# 

4081 
805# 
855# 
855# 
855# 
841« 

4555 

4558 

4563 
872# 
851# 

5010 

4313 
865# 

4049 

5015 
770 

1297 

4112# 
8684r 
869# 

4041« 

1297* 
806# 
81 2# 

1291 
81 5# 

5844 

5875 
91 8# 
81 0# 
8484r 
867# 
795 
860# 

4851 • 
831# 
850# 
814ir 
816# 

4078* 

4539# 
565 
790» 
S07M 

5186 
821# 
811# 
852* 

4872* 

4104 
808# 
809# 
1594* 
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4787. 
5177 
4084# 
1282 
856# 
856# 
855 
842* 
4645 
4694# 
4667 

4077 
5044 
5109* 

4096* 
5048* 
1544 
4051* 

1350 

1354 

4720 

4048* 

4119 

1500* 

4192* 

4208* 

5846 

5878 

4274 

1559« 

1299* 

887* 
4868* 
4854* 
4780 
4828 



SCO 0124 



5175 



416'* 

5202 

4555 

4210* 

4259 

4878* 

4108* 

1315* 

1516* 

1605* 



4794 


4820- 


4825* 


















1285 
857# 
857* 


1291 
858* 
858* 


1297 
850* 
859* 


1298 
840* 
840* 


1299 
841* 
841* 














845* 
4692* 


844* 


845* 


846* 


84 7« 














4695* 






















4214 


425^y 


-.260 


4279 


4284 


4527 


4574 


4672 


4692 


4776 


4828 


4085* 


4254 




















1805 
4757 


2059 
4762 


4216 
4842 


4755 


4840 


4864 












4052 
4148 
4150 


4150 
4175* 


4156* 
4178 


4178 


4201* 


4259 












4209* 

5849 

5881 


4210 
5851 
5885 


4259 
5854 
5886 


4266 
5856 
5888 


5828 
5858 
5890 


5850 
5860 
5895 


5855 
5862 
5896 


5855 
5864 
5898 


5857 
5867 
5899 


5859 
5870 
5901 


5841 
5875 
5904 


4074 
i,}72» 


4207* 
4250 


4259 
4252 


4259 
















4862 
4828 


4871* 


4879* 


















4164 
5225* 

4575 

4682 


41 66* 

4699 
(,692 


4177 

4P63 
4828 


















4154* 
1584* 
1654* 


a 70* 
1599* 
1645* 


4175 

1407* 

1674* 


4177 

1422* 

1685* 


1455* 
1726* 


1447* 
1755* 


1460* 
1759- 


1512« 
1851* 


1525* 
1840* 


1554* 
I860- 


1565- 
1875* 
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^884* 


1905* 


1920* 


"933* 


1951* 


1964* 


1977* 


1995* 


2011* 


2020* 


2028* 


2036* 


2044* 






2143" 


2170* 


2197* 


2225« 


2250* 


2274* 


2292* 


2319* 


2346* 


2373* 


2400* 


2450* 


2511* 






2561* 


2597« 


2627* 


2663* 


2681* 


2692* 


2708* 


2748* 


2792* 


2815* 


2853* 


2905* 


2918* 






2961* 


3018* 


3031* 


3074* 


3137* 


3159* 


3183* 


3192* 


3201* 


3250* 


3271* 


3298* 


3310* 






3325* 


3345* 


3372* 


3400« 


3446* 


3490* 


3501* 


3521* 


3534* 


3546* 


3557* 


3571* 


3585* 






3598* 


3612* 


3665* 


3681* 


3697* 


3712* 


1729* 


3747* 


3764* 


3781* 


3820* 


3850* 


3863* 






3875* 


3886* 


3899* 


3913" 


3926* 


3940* 


3984* 


3997* 


4154 


4171* 


4177 


4229 




tMADRI 


001260 


885ir 


2493 












4755 












tMAlL 


001226 


791 


795 


858* 


1333 


1350 


4169 


4216 












VIAMSI 


001256 


879# 


























SMBAOR 


000206 


791 # 


























WFLG 


037700 


4832* 


4838 


4873* 


4877* 






















036740 


4542 


4697* 
























tMSGAD 


001242 


8654^ 


4848* 


4851 






















tMSGLG 


001244 


866# 


4853* 








4866 


4870* 














IMSGTr 


001226 


859# 


1229* 


1257* 


4846 


4854* 














SMSUR 


056727 


4539 


4695* 
























SMTYPl 


001257 


8804r 


























SMXCNT 


034562 


4167 


4177* 
























SNULL 


001154 


829# 


4782 


4828 


















1546 




tNUTST= 


000001 


1376# 


1378 


1401* 


1403 


1425* 


1427 


1462* 


1464 


1500* 


1502 


1544* 


1584* 


1586 


1624* 


1626 


1664* 


1666 


1704* 


1706 


1761* 


1763 


1785* 


1787 


1819* 


1821 






1862# 


1864 


1909* 


1911 


1953* 


1955 


1997* 


1999 


20^,60 


2048 


2111* 


2113 


2276* 






2278 


2402* 


2404 


2534* 


2536 


2600* 


2602 


2667* 


2669 


2723* 


2725 


2796* 


2798 






2886# 


2888 


3001* 


3003 


3115* 


3117 


3165* 


3167 


3257* 


3259 


3301* 


3303 


3328* 






3330 


3375* 


3377 


3456* 


3458 


3630* 


3632 


3801* 


3803 


3957* 


3959 


3999* 


4001 


SOCNT 


040202 


4941* 


4970* 


4983* 






















SOCTVL 


040630 


5111 


5136* 
























tOMODE 


040204 


4936* 


4940* 


4945 


4948» 


4959* 


4985* 
















SOVER 


034546 


4131 


4147 


4155 


4165 


4174* 


















tPASS 


001234 


862ir 


1333» 


1807 


2061 


4045* 


4046* 


4060 


4161 


4178 


4710 








tPASTM 


000212 


793# 


























SPURAO 


041074 


521 9# 


























SPURON 


040734 


1295 


5186* 


5214 






















SPWRMG 


041070 


521 7# 


























tPURUP 


041006 


5196 


5202* 
























SQUES 


001222 


850ir 


4239 


4593 


4675 


4692 


4828 
















SROCHR 


036302 


4606ir 


5178 
























IR00EC= 


• \j 


5180 


























SROLIN 


036422 


4634# 


5''79 
























SRDOCTr 


• ij 


5180 


























tROSZ = 


000010 


4627# 


























SREGAO 


001160 


833ir 




















5873 




5878 


SREGO 


001162 


835ir 


4194* 


5833 


5835 


5839 


5841 


5844 


5846 


5856 


5870 


5875 




5890 


5896 
























tREGI 


001164 


836ir 


4195* 


5833 


5839 


5841 


5846 


5860 


5881 


5888 


5890 


5893 


5896 


5904 


SREG2 


001166 


837# 


4196* 


5841 


5846 


5860 


5862 


5864 


5867 


5875 


5888 


5904 






$REG3 


001170 


8384r 


4197* 


5854 


5856 


5864 


5878 


5893 






5901 








tREG4 


001172 


839# 


4198* 


5849 


5851 


5867 


5870 


5873 


5875 


5878 








SREGS 


001174 


8404r 


4199* 


5846 


5851 


5854 


5856 


5858 














SRESRE 


040470 


5086# 


5181 
























SRTNAO 


034274 


4110* 


























SRTRN 


034270 


1303 


1305* 


1310* 


4082 


4105* 


















SR2A = 


u 


5182 


























SSAVRE 


040432 


5070* 


5180 
























tSAVR6 


041116 


5195* 


5203 


5204* 


5205* 


5225* 
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(SCOPE 


05<.504 


■'289 


t SETUPS 


000137 


753# 






4129 


SS^UP = 


177777 


753# 


tSVLAD 


034512 


4139 


tSvPC = 


000204 


768# 


SSWR = 


177400 


553# 






1298 






1673 






2551 






3469 






4145 






4187 


tSWREG 


001250 


870# 


tswraiK= 


000000 


574 


STBIT 


034276 


i3U» 


STESTN 


001232 


861 # 


tTIMES 


001212 


84 74r 


ST<B 


001146 


8264r 


»Tr- 


con 44 


825# 


STIiPO 


001176 


841# 






2179* 






3432* 


$TMP1 


001200 


842# 


tTMP2 


001202 


84 3# 






3928 • 


STnP3 


001204 


844# 


(TMPA 


001206 


84 5# 


1TMP5 


001210 


846« 


$TM = 


000050 


553# 






1530 






1704 






1953 






2534 






301 4« 






3456 


STPB 


001152 


8284r 


STPFLG 


001 157 


832# 


$TPS 


001150 


8270 


(TRAP 


040646 


1293 


$TRAP2 


040670 


5156# 


$TRP = 


000015 


5160# 






5181# 


(T^PAD 


040702 


5150 


STSTM 


000210 


7920 


(TSTNM 


001102 


8050 


(TTYIN 


036700 


4636 


STYPBN 


037704 


4894# 


(TYPOS 


040206 


4998# 


(TYPE 


037102 


4749# 


(TYPEC 


037314 


4579 


(TYPEX 


037434 


4821 


(TYPOC 


040004 


4939# 


(TYPON 


040020 


4938 


(TYPOS 


037760 


4934# 


(UNIT 


001240 


864« 
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4128« 








1288 


1289 


1291 


1293 


4193 


4226 


4234 


t>522 


4168# 








773 








563 


567 


568 


569 


1299 


1301 


1315 


1316 


1716 


1772 


1794 


1828 


2617 


2678 


2733 


2306 


3643 


3814 


3966 


4009 


4148 


4149 


4150 


4157 


4188 


4204 


4211 


U221 


1336 








575 


4124 


4125 


4146 


4101* 


4niir 


5221* 




4169* 








1298* 


4044* 


4157* 


4164 


4520 


4531 


4548 


4610 


4520 


4529 


4545 


4557* 


2149* 


2155 


2176* 


2182 


2385 


2458* 


2750* 


2780 


3433 


4090* 


4095 


5851 


3203* 


3215* 


3218» 


3219 


3207" 


3216 


3573* 


3574 


3929 


5883 






4710* 


4711* 


4717 




563 


1376 


1384* 


1401 


1544 


1553# 


1570 


1584 


1716# 


1761 


M720 


1785 


1962# 


1997 


201 0# 


2046 


2551# 


2600 


2ii\70 


2667 


3115 


3130* 


3165 


3180» 


3469# 


3613 


3630 


3643» 


4817* 


4828 








4oee 






4815 


4828 






5145# 








5167 








5^t90 


5170* 


5171# 


5172* 


5182* 








5167ilf 








4043* 


4119 


4146 


4168* 


4637 


4655 


4673 


4687 


5173 








5172 








4859 


5160 


5168 




4779 


4786 


4793 


4798# 


4823 


4826/V 






5169 








494 U 


5171 






5170 
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1295 


1297 


1296 


1299 


4699 


5221 






570 


571 


572 


573 


1384 


1407 


1433 


1472 


1872 


1918 


1962 


2010 


2899 


3014 


3130 


3180 


4120 


4121 


4122 


4123 


4158 


4159 


4171 


4174 


4227 


4239 


5220 




4167* 


U'[77 






4616 


4801 


4808 


4828 


4577* 


4608 


4614 


4799 


.3t03» 


2209 


2298* 


2304 


2817* 


2847 


3206* 


3213 


5862 


5864 


5867 


5883 


3225* 


3230* 


3234* 


3235 


3600* 


3601 


3732 


3733* 


1407# 


1425 


1433# 


1462 




1 O 1 w 


1 Oc** 


1 O J 


1794# 


1814 


1819 


1828« 


2057# 


2111 


2129# 


227o 


2678# 


2723 


27110 


2796 


3257 


12700 


3301 


3309# 










5173# 


5174# 


5175 


5176# 


4169 


4174 


4178 


4200 


4691 # 









SEO 01 



1301 


1315 


1344 


1347 


574 


847 


848 


849 




1 J J J 






2057 


2129 


2289 


2^12 


3270 


3309 


3341 


3391 


4124 


4130 


4142 


4144 


a77 


4184 


4185 


4186 


4806 


4828 






2325* 


2331 


2352* 


2358 


3415* 


3421* 


3425* 


3428* 


5901 








3767* 


3769 


3901* 


3902 


1472# 


1478 


1500 


1511# 








1690 


1862 


1872# 


1909 


19180 


2289# 


2402 


2^520 


2512 


2806« 


2886 


28990 


3001 


3328 


3341# 


3375 


3391 # 






^999 


4009* 


5177 


5178* 


5179# 


5180* 


4203 


4239 


4713 
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CJKDAD.P11 19-DEC-80 11:05 



tUNITM 

tOSwR 

tXOFF = 

tXCM = 

tXTSTR 

tOFiLL 

UOCATj 



.SASU: 
.IK 



0002K 
001 2S2 
000025 
000021 
05A316 
040203 
• ••••• [J 

050A35 



•••••• J 

000204 



794# 

871# 
4803 
4810 
4133* 
4955* 
4130 

75SM 
1286 
4692 
4832 

779# 
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4828 
4828 

4939* 
4213 

759# 
1315 
4699« 
4835 

784 



4949 


4984« 








768 


769# 


771# 


773* 


779 


1316 


1360# 


4058# 


(,0720 


4113* 


4828 


4880« 


5052# 


5136* 


5198 



SEO 0127 



780* 

4177 
5224 



782* 
4178 
5232* 



784« 
4239 
5826* 



802* 
4350* 



8S3 
4520 



1278* 
4691* 
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752# 


2145 


2170 


















ERROR 


S79# 


1238 


1269 




16S3 


1688 


1693 




1929 


1941 


1973 




236A 


2391 


2468 






2819 


2827 




3197 


3221 


3237 




356A 


3579 


3592 




3845 


3858 


3870 




4^31 


4445 


4459 


E SCAPE 


6854r 






CE T PR I 


685* 






GE TSWfi 

l**SG1 


685* 


1347* 




1376* 


1378 




MSG10 


1624* 


1626 




ISG1 1 


1664* 


1666 




MSG1? 


1704* 


1706 




MSG13 


1761* 


1763 




MSGU 


1785* 
''81 7* 


1787 




MSG15 


1821 




MS016 


1862* 


1864 




MSG17 


1909* 


1911 




MSG? 


1401* 


1403 




MSG20 


1953* 


1955 




MSG?1 


1997* 


1999 




MSG21A 
MSG22 


2046* 


2048 




2111* 


2113 




MSG23 


2276* 


2278 




MSG24 


2402* 


2404 




MSG25 


2534* 


2536 




MSG26 


2600* 


2602 




MSG27 


2667* 


2669 




MSG3 


1425* 


1427 




MSG30 


2723* 


2725 




MSG31 


2796* 


2798 




MSG3? 


2885* 


2888 




MSG33 


3000* 


3003 




MSG3A 


3114* 


3117 




MSG35 


3164* 


3167 




MSG 36 
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